Hi Jerome,

These are Mach3 and Mach3 VB questions. I fixed general typos and syntax errors so it now compiles and uploaded the file.

It will be up to you to understand it and debug it. I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.

The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.

Regards

Group: DynoMotion	Message: 4791	From: Fouijar	Date: 5/6/2012
Subject: Re: ATC M6 macro under mach3

Hi Tom,

I know this is Mach3 related.
But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
I started a topic on the VB section of machsupport.
http://www.machsupport.com/forum/index.php/topic,21505.0.html

The flowchart is included in my files: ATC procedure.png

The Compare function was created to check if the current tool is the same as the requested tool or new tool.

Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
I haven't checked your work yet.

Regards,

J.

--- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@...> wrote:
>
> Hi Jerome,
> Â
> These are Mach3 and Mach3 VB questions.Â I fixed general typos and syntax errors so it now compiles and uploaded the file.
> Â
> It will be up to you to understand itÂ and debug it.Â I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> Â
> The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> Â
> Regards
> TK
>
> From: Fouijar <fouijar@...>
> To: DynoMotion@yahoogroups.com
> Sent: Sunday, May 6, 2012 9:09 AM
> Subject: [DynoMotion] ATC M6 macro under mach3
>
>
> Â
> Hi Tom, Ray,
>
> In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
>
> I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
>
> I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
>
> I don't know if I have to use an oemdro for the Getcurrentool()?
>
> So if you can explain me what's wrong I could go further.
>
> Thanks for your attention,
>
> Jerome
>

Group: DynoMotion	Message: 4793	From: Fouijar	Date: 5/6/2012
Subject: Re: ATC M6 macro under mach3

Hi Tom,

I checked and compared files, I also made changes as proposed by mach users. The files mods proposed are:

while(IsMoving())
Sleep(100)
code("G00 Z-35")'Move to the safe Z position for tool change
while (IsMoving())

Should be this:

Code "G00 Z-35"
While IsMoving()
Wend

You don't need the Sleep() in the While IsMoving().

Mods are proposed by ger21 on machsupport forum.

I tried that, and your file without success.
I also tried a mix with(out) parenthesis :

IsMoving()<>(IsMoving())
code("G00 Z-35")<>Code "G00 Z-35"

Anyway I keep trying to find what's wrong.

Jerome

--- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@...> wrote:
>
> Hi Tom,
>
> I know this is Mach3 related.
> But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
> I started a topic on the VB section of machsupport.
> http://www.machsupport.com/forum/index.php/topic,21505.0.html
>
> The flowchart is included in my files: ATC procedure.png
>
> The Compare function was created to check if the current tool is the same as the requested tool or new tool.
>
> Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
> I haven't checked your work yet.
>
> Regards,
>
> J.
>
>
>
> --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> >
> > Hi Jerome,
> > Â
> > These are Mach3 and Mach3 VB questions.Â I fixed general typos and syntax errors so it now compiles and uploaded the file.
> > Â
> > It will be up to you to understand itÂ and debug it.Â I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> > Â
> > The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> > Â
> > Regards
> > TK
> >
> > From: Fouijar <fouijar@>
> > To: DynoMotion@yahoogroups.com
> > Sent: Sunday, May 6, 2012 9:09 AM
> > Subject: [DynoMotion] ATC M6 macro under mach3
> >
> >
> > Â
> > Hi Tom, Ray,
> >
> > In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> > At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> > I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
> >
> > I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
> >
> > I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
> >
> > I don't know if I have to use an oemdro for the Getcurrentool()?
> >
> > So if you can explain me what's wrong I could go further.
> >
> > Thanks for your attention,
> >
> > Jerome
> >
>

Group: DynoMotion	Message: 4795	From: Tom Kerekes	Date: 5/6/2012
Subject: Re: ATC M6 macro under mach3

Hi Jerome,

Sorry I wasn't aware of the Flowchart. You might point that out on the Mach3 foum as well so they will know what you are trying to do.

I wouldn't expect you to be able to just run it and get success. Something that complex will need to be debugged step by step.

I don't think parenthesis makes any difference in those cases.

To debug you might change the:

NewTool = GetSelectedTool()
OldTool = GetCurrentTool()

NewTool = 5
OldTool = 3

in order to force a known case and be able to run it right from the VB editor. Use single step and verify each step does what you expect.

I think you should change the initial Compare to (because it wasn't waiting for anything):

'Air Cylinder Homing
sub AirCyHome()
DeactivateSignal(OUTPUT8)
While (IsActive(INPUT1))
Sleep(10)
Wend
end sub

Regarding the ToolChangerPos this does a bunch of testing but doesn't do anything

'Carrousel air cylinder position check : Home, in Mvt and ToolChange
Function ToolChangerPos() As Boolean
If IsActive(INPUT1)>IsActive(INPUT2)Then 'We are at Home Position
ToolChangerPos = 0
TCMove = False 'We are stopped

ElseIf IsActive(INPUT1)<IsActive(INPUT2) Then
  ToolChangerPos = 1
  TCMove = False
  Else
  ToolChangerPos = -1
  TCMove = True
End If
End Function

the SpindleHome function just sets an output bit. I don't understand how you expect this to home the spindle. What type of spindle do you have?

Regards

Group: DynoMotion	Message: 4799	From: Fouijar	Date: 5/6/2012
Subject: Re: ATC M6 macro under mach3

Hi Tom,

I started debugging this evening, more to come tomorrow.
I suppressed the compare function and made a test to know if the program has to run or leave.
The air cylinder procedure was written to add a security check.
The spindle is an AC asynchronous servo, the drive has a function I programmed and tuned to react at a particular entry and align the spindle with the tool holder (bt30).

Thanks for your help,

Jerome

PS: I also write on the machsupport forum, this will give more visibility and resources.

http://www.machsupport.com/forum/index.php/topic,21505.msg149510.html#msg149510

--- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@...> wrote:
>
> Hi Jerome,
> Â
> Sorry I wasn't aware of the Flowchart.Â You might point that out on the Mach3 foum as well so they will know what you are trying to do.
> Â
> I wouldn't expect you to be able to just run it and get success.Â Something that complex will need to be debugged step by step.
> Â
> I don't think parenthesis makes any difference in those cases.
> Â
> To debug you might change the:
> Â
> NewTool = GetSelectedTool()
> OldTool = GetCurrentTool()
>
> to
> Â
> NewTool = 5
> OldTool = 3
> Â
> in order to force a known case and be able to run it right from the VB editor.Â Use single step and verify each step does what you expect.
> Â
> I think you should change the initial Compare to (because it wasn't waiting for anything):
> Â
> 'Air Cylinder Homing
> sub AirCyHome()
> Â DeactivateSignal(OUTPUT8)
> Â While (IsActive(INPUT1))
> Â Â Sleep(10)
> Â Wend
> end sub
> Â
> Â
> Regarding the ToolChangerPos this does a bunch of testing but doesn't do anything
> Â
> Â
> 'Carrousel air cylinder position check : Home, in Mvt and ToolChange
> Function ToolChangerPos() As Boolean
> Â If IsActive(INPUT1)>IsActive(INPUT2)Then 'We are at Home Position
> Â ToolChangerPos = 0
> Â TCMove = False 'We are stopped
> Â
> Â ElseIf IsActive(INPUT1)<IsActive(INPUT2) Then
> Â Â ToolChangerPos = 1
> Â Â TCMove = False
> Â Â Else
> Â Â ToolChangerPos = -1
> Â Â TCMove = True
> Â End If
> End Function
>
> Â
> the SpindleHome function just sets an output bit.Â I don't understand how you expect this to home the spindle.Â What type of spindle do you have?
> Â
> Regards
> TK
> Â
> Â
> Â
> Â
>
> From: Fouijar <fouijar@...>
> To: DynoMotion@yahoogroups.com
> Sent: Sunday, May 6, 2012 1:38 PM
> Subject: [DynoMotion] Re: ATC M6 macro under mach3
>
>
> Â
> Hi Tom,
>
> I checked and compared files, I also made changes as proposed by mach users. The files mods proposed are:
>
> while(IsMoving())
> Sleep(100)
> code("G00 Z-35")'Move to the safe Z position for tool change
> while (IsMoving())
>
> Should be this:
>
> Code "G00 Z-35"
> While IsMoving()
> Wend
>
> You don't need the Sleep() in the While IsMoving().
>
> Mods are proposed by ger21 on machsupport forum.
>
> I tried that, and your file without success.
> I also tried a mix with(out) parenthesis :
>
> IsMoving()<>(IsMoving())
> code("G00 Z-35")<>Code "G00 Z-35"
>
> Anyway I keep trying to find what's wrong.
>
> Jerome
>
> --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> >
> > Hi Tom,
> >
> > I know this is Mach3 related.
> > But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
> > I started a topic on the VB section of machsupport.
> > http://www.machsupport.com/forum/index.php/topic,21505.0.html
> >
> > The flowchart is included in my files: ATC procedure.png
> >
> > The Compare function was created to check if the current tool is the same as the requested tool or new tool.
> >
> > Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
> > I haven't checked your work yet.
> >
> > Regards,
> >
> > J.
> >
> >
> >
> > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > >
> > > Hi Jerome,
> > > ÃÂ
> > > These are Mach3 and Mach3 VB questions.ÃÂ I fixed general typos and syntax errors so it now compiles and uploaded the file.
> > > ÃÂ
> > > It will be up to you to understand itÃÂ and debug it.ÃÂ I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> > > ÃÂ
> > > The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> > > ÃÂ
> > > Regards
> > > TK
> > >
> > > From: Fouijar <fouijar@>
> > > To: DynoMotion@yahoogroups.com
> > > Sent: Sunday, May 6, 2012 9:09 AM
> > > Subject: [DynoMotion] ATC M6 macro under mach3
> > >
> > >
> > > ÃÂ
> > > Hi Tom, Ray,
> > >
> > > In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> > > At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> > > I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
> > >
> > > I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
> > >
> > > I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
> > >
> > > I don't know if I have to use an oemdro for the Getcurrentool()?
> > >
> > > So if you can explain me what's wrong I could go further.
> > >
> > > Thanks for your attention,
> > >
> > > Jerome
> > >
> >
>

Group: DynoMotion	Message: 4813	From: Fouijar	Date: 5/7/2012
Subject: Re: ATC M6 macro under mach3

Hi Tom,

I solved some issues I had in My M6 macro, I Use functions rather than Subs. I think that's not working to use a sub in main sub.
So I call functions inside the Main Sub.
I also use MsgBox to check what's wrong.
The file isn't faulty but doesn't work as it should. When I run the script the function, i.e., activatesignal(OUTPUT1) doesn't work. Maybe, I think, I have to use the NotifyPlugins() or this should be handled directly by the dynomotion plugin?

The only visible action is the executed code()function, the Z axis moves as commanded. This is a good step in the right direction.

If I have to use the NotifyPlugins() Then a previous thread I wrote about the best choice between C#, Vb or brains should probably be resumed to the C# choice, since the M6 could be executed in the Notify.c without handling communication issues. This is only IF.

I posted My code in the txt file ATC_J_Debug.

Thanks for your attention,

Jerome

--- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@...> wrote:
>
> Hi Tom,
>
> I started debugging this evening, more to come tomorrow.
> I suppressed the compare function and made a test to know if the program has to run or leave.
> The air cylinder procedure was written to add a security check.
> The spindle is an AC asynchronous servo, the drive has a function I programmed and tuned to react at a particular entry and align the spindle with the tool holder (bt30).
>
> Thanks for your help,
>
> Jerome
>
> PS: I also write on the machsupport forum, this will give more visibility and resources.
>
> http://www.machsupport.com/forum/index.php/topic,21505.msg149510.html#msg149510
>
>
>
>
> --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> >
> > Hi Jerome,
> > Â
> > Sorry I wasn't aware of the Flowchart.Â You might point that out on the Mach3 foum as well so they will know what you are trying to do.
> > Â
> > I wouldn't expect you to be able to just run it and get success.Â Something that complex will need to be debugged step by step.
> > Â
> > I don't think parenthesis makes any difference in those cases.
> > Â
> > To debug you might change the:
> > Â
> > NewTool = GetSelectedTool()
> > OldTool = GetCurrentTool()
> >
> > to
> > Â
> > NewTool = 5
> > OldTool = 3
> > Â
> > in order to force a known case and be able to run it right from the VB editor.Â Use single step and verify each step does what you expect.
> > Â
> > I think you should change the initial Compare to (because it wasn't waiting for anything):
> > Â
> > 'Air Cylinder Homing
> > sub AirCyHome()
> > Â DeactivateSignal(OUTPUT8)
> > Â While (IsActive(INPUT1))
> > Â Â Sleep(10)
> > Â Wend
> > end sub
> > Â
> > Â
> > Regarding the ToolChangerPos this does a bunch of testing but doesn't do anything
> > Â
> > Â
> > 'Carrousel air cylinder position check : Home, in Mvt and ToolChange
> > Function ToolChangerPos() As Boolean
> > Â If IsActive(INPUT1)>IsActive(INPUT2)Then 'We are at Home Position
> > Â ToolChangerPos = 0
> > Â TCMove = False 'We are stopped
> > Â
> > Â ElseIf IsActive(INPUT1)<IsActive(INPUT2) Then
> > Â Â ToolChangerPos = 1
> > Â Â TCMove = False
> > Â Â Else
> > Â Â ToolChangerPos = -1
> > Â Â TCMove = True
> > Â End If
> > End Function
> >
> > Â
> > the SpindleHome function just sets an output bit.Â I don't understand how you expect this to home the spindle.Â What type of spindle do you have?
> > Â
> > Regards
> > TK
> > Â
> > Â
> > Â
> > Â
> >
> > From: Fouijar <fouijar@>
> > To: DynoMotion@yahoogroups.com
> > Sent: Sunday, May 6, 2012 1:38 PM
> > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> >
> >
> > Â
> > Hi Tom,
> >
> > I checked and compared files, I also made changes as proposed by mach users. The files mods proposed are:
> >
> > while(IsMoving())
> > Sleep(100)
> > code("G00 Z-35")'Move to the safe Z position for tool change
> > while (IsMoving())
> >
> > Should be this:
> >
> > Code "G00 Z-35"
> > While IsMoving()
> > Wend
> >
> > You don't need the Sleep() in the While IsMoving().
> >
> > Mods are proposed by ger21 on machsupport forum.
> >
> > I tried that, and your file without success.
> > I also tried a mix with(out) parenthesis :
> >
> > IsMoving()<>(IsMoving())
> > code("G00 Z-35")<>Code "G00 Z-35"
> >
> > Anyway I keep trying to find what's wrong.
> >
> > Jerome
> >
> > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > >
> > > Hi Tom,
> > >
> > > I know this is Mach3 related.
> > > But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
> > > I started a topic on the VB section of machsupport.
> > > http://www.machsupport.com/forum/index.php/topic,21505.0.html
> > >
> > > The flowchart is included in my files: ATC procedure.png
> > >
> > > The Compare function was created to check if the current tool is the same as the requested tool or new tool.
> > >
> > > Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
> > > I haven't checked your work yet.
> > >
> > > Regards,
> > >
> > > J.
> > >
> > >
> > >
> > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > >
> > > > Hi Jerome,
> > > > ÃÂ
> > > > These are Mach3 and Mach3 VB questions.ÃÂ I fixed general typos and syntax errors so it now compiles and uploaded the file.
> > > > ÃÂ
> > > > It will be up to you to understand itÃÂ and debug it.ÃÂ I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> > > > ÃÂ
> > > > The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> > > > ÃÂ
> > > > Regards
> > > > TK
> > > >
> > > > From: Fouijar <fouijar@>
> > > > To: DynoMotion@yahoogroups.com
> > > > Sent: Sunday, May 6, 2012 9:09 AM
> > > > Subject: [DynoMotion] ATC M6 macro under mach3
> > > >
> > > >
> > > > ÃÂ
> > > > Hi Tom, Ray,
> > > >
> > > > In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> > > > At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> > > > I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
> > > >
> > > > I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
> > > >
> > > > I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
> > > >
> > > > I don't know if I have to use an oemdro for the Getcurrentool()?
> > > >
> > > > So if you can explain me what's wrong I could go further.
> > > >
> > > > Thanks for your attention,
> > > >
> > > > Jerome
> > > >
> > >
> >
>

Group: DynoMotion	Message: 4814	From: Tom Kerekes	Date: 5/7/2012
Subject: Re: ATC M6 macro under mach3

Hi Jerome,

activatesignal(OUTPUT1) should work. Do you have Output1 configured in Ports&Pins Ouputs and enabled?

Here is some Mach3 VB code that will blink a KFLOP LED if Mach3 Output1 is configured as Port1 Pin46

activatesignal(OUTPUT1)
Sleep 1000
deactivatesignal(OUTPUT1)
Sleep 1000
activatesignal(OUTPUT1)
Sleep 1000
deactivatesignal(OUTPUT1)

Group: DynoMotion	Message: 4815	From: Fouijar	Date: 5/7/2012
Subject: Re: ATC M6 macro under mach3

Hi Tom,

Outputs and inputs enabled.

I was checking the bit numbers for inputs and outputs. I had the idea to use the WaitSystemFor(INPUT5), or a while(INPUT5=0)sleep(100)Wend
sequence. The idea is to have an output condition, or a temp.
INPUT5 is the limit switch indicating that the drawbar has released the tool.
I will test both and see.

J.

--- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@...> wrote:
>
> Hi Jerome,
> Â
> activatesignal(OUTPUT1) should work.Â Do you have Output1 configured in Ports&Pins Ouputs and enabled?
> Â
> Here is some Mach3 VB code that will blink a KFLOP LED if Mach3 Output1 is configured as Port1 Pin46
> Â
> activatesignal(OUTPUT1)
> Sleep 1000
> deactivatesignal(OUTPUT1)
> Sleep 1000
> activatesignal(OUTPUT1)
> Sleep 1000
> deactivatesignal(OUTPUT1)
>
> TK
>
> From: Fouijar <fouijar@...>
> To: DynoMotion@yahoogroups.com
> Sent: Monday, May 7, 2012 2:34 PM
> Subject: [DynoMotion] Re: ATC M6 macro under mach3
>
>
> Â
> Hi Tom,
>
> I solved some issues I had in My M6 macro, I Use functions rather than Subs. I think that's not working to use a sub in main sub.
> So I call functions inside the Main Sub.
> I also use MsgBox to check what's wrong.
> The file isn't faulty but doesn't work as it should. When I run the script the function, i.e., activatesignal(OUTPUT1) doesn't work. Maybe, I think, I have to use the NotifyPlugins() or this should be handled directly by the dynomotion plugin?
>
> The only visible action is the executed code()function, the Z axis moves as commanded. This is a good step in the right direction.
>
> If I have to use the NotifyPlugins() Then a previous thread I wrote about the best choice between C#, Vb or brains should probably be resumed to the C# choice, since the M6 could be executed in the Notify.c without handling communication issues. This is only IF.
>
> I posted My code in the txt file ATC_J_Debug.
>
> Thanks for your attention,
>
> Jerome
>
> --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> >
> > Hi Tom,
> >
> > I started debugging this evening, more to come tomorrow.
> > I suppressed the compare function and made a test to know if the program has to run or leave.
> > The air cylinder procedure was written to add a security check.
> > The spindle is an AC asynchronous servo, the drive has a function I programmed and tuned to react at a particular entry and align the spindle with the tool holder (bt30).
> >
> > Thanks for your help,
> >
> > Jerome
> >
> > PS: I also write on the machsupport forum, this will give more visibility and resources.
> >
> > http://www.machsupport.com/forum/index.php/topic,21505.msg149510.html#msg149510
> >
> >
> >
> >
> > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > >
> > > Hi Jerome,
> > > ÃÂ
> > > Sorry I wasn't aware of the Flowchart.ÃÂ You might point that out on the Mach3 foum as well so they will know what you are trying to do.
> > > ÃÂ
> > > I wouldn't expect you to be able to just run it and get success.ÃÂ Something that complex will need to be debugged step by step.
> > > ÃÂ
> > > I don't think parenthesis makes any difference in those cases.
> > > ÃÂ
> > > To debug you might change the:
> > > ÃÂ
> > > NewTool = GetSelectedTool()
> > > OldTool = GetCurrentTool()
> > >
> > > to
> > > ÃÂ
> > > NewTool = 5
> > > OldTool = 3
> > > ÃÂ
> > > in order to force a known case and be able to run it right from the VB editor.ÃÂ Use single step and verify each step does what you expect.
> > > ÃÂ
> > > I think you should change the initial Compare to (because it wasn't waiting for anything):
> > > ÃÂ
> > > 'Air Cylinder Homing
> > > sub AirCyHome()
> > > ÃÂ DeactivateSignal(OUTPUT8)
> > > ÃÂ While (IsActive(INPUT1))
> > > ÃÂ ÃÂ Sleep(10)
> > > ÃÂ Wend
> > > end sub
> > > ÃÂ
> > > ÃÂ
> > > Regarding the ToolChangerPos this does a bunch of testing but doesn't do anything
> > > ÃÂ
> > > ÃÂ
> > > 'Carrousel air cylinder position check : Home, in Mvt and ToolChange
> > > Function ToolChangerPos() As Boolean
> > > ÃÂ If IsActive(INPUT1)>IsActive(INPUT2)Then 'We are at Home Position
> > > ÃÂ ToolChangerPos = 0
> > > ÃÂ TCMove = False 'We are stopped
> > > ÃÂ
> > > ÃÂ ElseIf IsActive(INPUT1)<IsActive(INPUT2) Then
> > > ÃÂ ÃÂ ToolChangerPos = 1
> > > ÃÂ ÃÂ TCMove = False
> > > ÃÂ ÃÂ Else
> > > ÃÂ ÃÂ ToolChangerPos = -1
> > > ÃÂ ÃÂ TCMove = True
> > > ÃÂ End If
> > > End Function
> > >
> > > ÃÂ
> > > the SpindleHome function just sets an output bit.ÃÂ I don't understand how you expect this to home the spindle.ÃÂ What type of spindle do you have?
> > > ÃÂ
> > > Regards
> > > TK
> > > ÃÂ
> > > ÃÂ
> > > ÃÂ
> > > ÃÂ
> > >
> > > From: Fouijar <fouijar@>
> > > To: DynoMotion@yahoogroups.com
> > > Sent: Sunday, May 6, 2012 1:38 PM
> > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > >
> > >
> > > ÃÂ
> > > Hi Tom,
> > >
> > > I checked and compared files, I also made changes as proposed by mach users. The files mods proposed are:
> > >
> > > while(IsMoving())
> > > Sleep(100)
> > > code("G00 Z-35")'Move to the safe Z position for tool change
> > > while (IsMoving())
> > >
> > > Should be this:
> > >
> > > Code "G00 Z-35"
> > > While IsMoving()
> > > Wend
> > >
> > > You don't need the Sleep() in the While IsMoving().
> > >
> > > Mods are proposed by ger21 on machsupport forum.
> > >
> > > I tried that, and your file without success.
> > > I also tried a mix with(out) parenthesis :
> > >
> > > IsMoving()<>(IsMoving())
> > > code("G00 Z-35")<>Code "G00 Z-35"
> > >
> > > Anyway I keep trying to find what's wrong.
> > >
> > > Jerome
> > >
> > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > >
> > > > Hi Tom,
> > > >
> > > > I know this is Mach3 related.
> > > > But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
> > > > I started a topic on the VB section of machsupport.
> > > > http://www.machsupport.com/forum/index.php/topic,21505.0.html
> > > >
> > > > The flowchart is included in my files: ATC procedure.png
> > > >
> > > > The Compare function was created to check if the current tool is the same as the requested tool or new tool.
> > > >
> > > > Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
> > > > I haven't checked your work yet.
> > > >
> > > > Regards,
> > > >
> > > > J.
> > > >
> > > >
> > > >
> > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > >
> > > > > Hi Jerome,
> > > > > ÃâÃÂ
> > > > > These are Mach3 and Mach3 VB questions.ÃâÃÂ I fixed general typos and syntax errors so it now compiles and uploaded the file.
> > > > > ÃâÃÂ
> > > > > It will be up to you to understand itÃâÃÂ and debug it.ÃâÃÂ I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> > > > > ÃâÃÂ
> > > > > The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> > > > > ÃâÃÂ
> > > > > Regards
> > > > > TK
> > > > >
> > > > > From: Fouijar <fouijar@>
> > > > > To: DynoMotion@yahoogroups.com
> > > > > Sent: Sunday, May 6, 2012 9:09 AM
> > > > > Subject: [DynoMotion] ATC M6 macro under mach3
> > > > >
> > > > >
> > > > > ÃâÃÂ
> > > > > Hi Tom, Ray,
> > > > >
> > > > > In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> > > > > At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> > > > > I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
> > > > >
> > > > > I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
> > > > >
> > > > > I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
> > > > >
> > > > > I don't know if I have to use an oemdro for the Getcurrentool()?
> > > > >
> > > > > So if you can explain me what's wrong I could go further.
> > > > >
> > > > > Thanks for your attention,
> > > > >
> > > > > Jerome
> > > > >
> > > >
> > >
> >
>

Group: DynoMotion	Message: 4816	From: Tom Kerekes	Date: 5/7/2012
Subject: Re: ATC M6 macro under mach3

Hi Jerome,

I can't understand what you are saying, but to wait for an input I think you would do something like

while (not IsActive(INPUT5))

Sleep(100)

wend

Group: DynoMotion	Message: 4817	From: Fouijar	Date: 5/7/2012
Subject: Re: ATC M6 macro under mach3

Hi Tom,

SystemWaitFor is a Bad idea...
It freezes everything or nearly.

I used OUTPUT1 and 4, the Led is working. I also found that the flow sequence isn't followed as called/written. This is clear when I receive MsgBox that are logically after the previous which hasn't showed up but after the last i.e.

I'll rewrite my M6 without subs, functions and check.
I have little experience with VB, but this is illogic* for a programming language, I already pointed this issue before and tried to use GoTo, without success. (*I think something is missing me to handle the program nicely).

I update when appropriate,

J.

--- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@...> wrote:
>
> Hi Tom,
>
> Outputs and inputs enabled.
>
> I was checking the bit numbers for inputs and outputs. I had the idea to use the WaitSystemFor(INPUT5), or a while(INPUT5=0)sleep(100)Wend
> sequence. The idea is to have an output condition, or a temp.
> INPUT5 is the limit switch indicating that the drawbar has released the tool.
> I will test both and see.
>
> J.
>
> --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> >
> > Hi Jerome,
> > Â
> > activatesignal(OUTPUT1) should work.Â Do you have Output1 configured in Ports&Pins Ouputs and enabled?
> > Â
> > Here is some Mach3 VB code that will blink a KFLOP LED if Mach3 Output1 is configured as Port1 Pin46
> > Â
> > activatesignal(OUTPUT1)
> > Sleep 1000
> > deactivatesignal(OUTPUT1)
> > Sleep 1000
> > activatesignal(OUTPUT1)
> > Sleep 1000
> > deactivatesignal(OUTPUT1)
> >
> > TK
> >
> > From: Fouijar <fouijar@>
> > To: DynoMotion@yahoogroups.com
> > Sent: Monday, May 7, 2012 2:34 PM
> > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> >
> >
> > Â
> > Hi Tom,
> >
> > I solved some issues I had in My M6 macro, I Use functions rather than Subs. I think that's not working to use a sub in main sub.
> > So I call functions inside the Main Sub.
> > I also use MsgBox to check what's wrong.
> > The file isn't faulty but doesn't work as it should. When I run the script the function, i.e., activatesignal(OUTPUT1) doesn't work. Maybe, I think, I have to use the NotifyPlugins() or this should be handled directly by the dynomotion plugin?
> >
> > The only visible action is the executed code()function, the Z axis moves as commanded. This is a good step in the right direction.
> >
> > If I have to use the NotifyPlugins() Then a previous thread I wrote about the best choice between C#, Vb or brains should probably be resumed to the C# choice, since the M6 could be executed in the Notify.c without handling communication issues. This is only IF.
> >
> > I posted My code in the txt file ATC_J_Debug.
> >
> > Thanks for your attention,
> >
> > Jerome
> >
> > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > >
> > > Hi Tom,
> > >
> > > I started debugging this evening, more to come tomorrow.
> > > I suppressed the compare function and made a test to know if the program has to run or leave.
> > > The air cylinder procedure was written to add a security check.
> > > The spindle is an AC asynchronous servo, the drive has a function I programmed and tuned to react at a particular entry and align the spindle with the tool holder (bt30).
> > >
> > > Thanks for your help,
> > >
> > > Jerome
> > >
> > > PS: I also write on the machsupport forum, this will give more visibility and resources.
> > >
> > > http://www.machsupport.com/forum/index.php/topic,21505.msg149510.html#msg149510
> > >
> > >
> > >
> > >
> > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > >
> > > > Hi Jerome,
> > > > ÃÂ
> > > > Sorry I wasn't aware of the Flowchart.ÃÂ You might point that out on the Mach3 foum as well so they will know what you are trying to do.
> > > > ÃÂ
> > > > I wouldn't expect you to be able to just run it and get success.ÃÂ Something that complex will need to be debugged step by step.
> > > > ÃÂ
> > > > I don't think parenthesis makes any difference in those cases.
> > > > ÃÂ
> > > > To debug you might change the:
> > > > ÃÂ
> > > > NewTool = GetSelectedTool()
> > > > OldTool = GetCurrentTool()
> > > >
> > > > to
> > > > ÃÂ
> > > > NewTool = 5
> > > > OldTool = 3
> > > > ÃÂ
> > > > in order to force a known case and be able to run it right from the VB editor.ÃÂ Use single step and verify each step does what you expect.
> > > > ÃÂ
> > > > I think you should change the initial Compare to (because it wasn't waiting for anything):
> > > > ÃÂ
> > > > 'Air Cylinder Homing
> > > > sub AirCyHome()
> > > > ÃÂ DeactivateSignal(OUTPUT8)
> > > > ÃÂ While (IsActive(INPUT1))
> > > > ÃÂ ÃÂ Sleep(10)
> > > > ÃÂ Wend
> > > > end sub
> > > > ÃÂ
> > > > ÃÂ
> > > > Regarding the ToolChangerPos this does a bunch of testing but doesn't do anything
> > > > ÃÂ
> > > > ÃÂ
> > > > 'Carrousel air cylinder position check : Home, in Mvt and ToolChange
> > > > Function ToolChangerPos() As Boolean
> > > > ÃÂ If IsActive(INPUT1)>IsActive(INPUT2)Then 'We are at Home Position
> > > > ÃÂ ToolChangerPos = 0
> > > > ÃÂ TCMove = False 'We are stopped
> > > > ÃÂ
> > > > ÃÂ ElseIf IsActive(INPUT1)<IsActive(INPUT2) Then
> > > > ÃÂ ÃÂ ToolChangerPos = 1
> > > > ÃÂ ÃÂ TCMove = False
> > > > ÃÂ ÃÂ Else
> > > > ÃÂ ÃÂ ToolChangerPos = -1
> > > > ÃÂ ÃÂ TCMove = True
> > > > ÃÂ End If
> > > > End Function
> > > >
> > > > ÃÂ
> > > > the SpindleHome function just sets an output bit.ÃÂ I don't understand how you expect this to home the spindle.ÃÂ What type of spindle do you have?
> > > > ÃÂ
> > > > Regards
> > > > TK
> > > > ÃÂ
> > > > ÃÂ
> > > > ÃÂ
> > > > ÃÂ
> > > >
> > > > From: Fouijar <fouijar@>
> > > > To: DynoMotion@yahoogroups.com
> > > > Sent: Sunday, May 6, 2012 1:38 PM
> > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > >
> > > >
> > > > ÃÂ
> > > > Hi Tom,
> > > >
> > > > I checked and compared files, I also made changes as proposed by mach users. The files mods proposed are:
> > > >
> > > > while(IsMoving())
> > > > Sleep(100)
> > > > code("G00 Z-35")'Move to the safe Z position for tool change
> > > > while (IsMoving())
> > > >
> > > > Should be this:
> > > >
> > > > Code "G00 Z-35"
> > > > While IsMoving()
> > > > Wend
> > > >
> > > > You don't need the Sleep() in the While IsMoving().
> > > >
> > > > Mods are proposed by ger21 on machsupport forum.
> > > >
> > > > I tried that, and your file without success.
> > > > I also tried a mix with(out) parenthesis :
> > > >
> > > > IsMoving()<>(IsMoving())
> > > > code("G00 Z-35")<>Code "G00 Z-35"
> > > >
> > > > Anyway I keep trying to find what's wrong.
> > > >
> > > > Jerome
> > > >
> > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > >
> > > > > Hi Tom,
> > > > >
> > > > > I know this is Mach3 related.
> > > > > But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
> > > > > I started a topic on the VB section of machsupport.
> > > > > http://www.machsupport.com/forum/index.php/topic,21505.0.html
> > > > >
> > > > > The flowchart is included in my files: ATC procedure.png
> > > > >
> > > > > The Compare function was created to check if the current tool is the same as the requested tool or new tool.
> > > > >
> > > > > Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
> > > > > I haven't checked your work yet.
> > > > >
> > > > > Regards,
> > > > >
> > > > > J.
> > > > >
> > > > >
> > > > >
> > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > >
> > > > > > Hi Jerome,
> > > > > > ÃâÃÂ
> > > > > > These are Mach3 and Mach3 VB questions.ÃâÃÂ I fixed general typos and syntax errors so it now compiles and uploaded the file.
> > > > > > ÃâÃÂ
> > > > > > It will be up to you to understand itÃâÃÂ and debug it.ÃâÃÂ I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> > > > > > ÃâÃÂ
> > > > > > The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> > > > > > ÃâÃÂ
> > > > > > Regards
> > > > > > TK
> > > > > >
> > > > > > From: Fouijar <fouijar@>
> > > > > > To: DynoMotion@yahoogroups.com
> > > > > > Sent: Sunday, May 6, 2012 9:09 AM
> > > > > > Subject: [DynoMotion] ATC M6 macro under mach3
> > > > > >
> > > > > >
> > > > > > ÃâÃÂ
> > > > > > Hi Tom, Ray,
> > > > > >
> > > > > > In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> > > > > > At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> > > > > > I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
> > > > > >
> > > > > > I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
> > > > > >
> > > > > > I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
> > > > > >
> > > > > > I don't know if I have to use an oemdro for the Getcurrentool()?
> > > > > >
> > > > > > So if you can explain me what's wrong I could go further.
> > > > > >
> > > > > > Thanks for your attention,
> > > > > >
> > > > > > Jerome
> > > > > >
> > > > >
> > > >
> > >
> >
>

Group: DynoMotion	Message: 4818	From: Fouijar	Date: 5/7/2012
Subject: Re: ATC M6 macro under mach3

Hi Tom,

Yes this the idea, but my actual problem is more about calling sequence not followed as it should.

J.

--- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@...> wrote:
>
> Hi Jerome,
> Â
> I can't understand what you are saying, but to wait for an inputÂ I think you would do something like
> Â
> while (not IsActive(INPUT5))
> Â Sleep(100)
> wend
> Â
> TK
>
> From: Fouijar <fouijar@...>
> To: DynoMotion@yahoogroups.com
> Sent: Monday, May 7, 2012 3:19 PM
> Subject: [DynoMotion] Re: ATC M6 macro under mach3
>
>
> Â
> Hi Tom,
>
> Outputs and inputs enabled.
>
> I was checking the bit numbers for inputs and outputs. I had the idea to use the WaitSystemFor(INPUT5), or a while(INPUT5=0)sleep(100)Wend
> sequence. The idea is to have an output condition, or a temp.
> INPUT5 is the limit switch indicating that the drawbar has released the tool.
> I will test both and see.
>
> J.
>
> --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> >
> > Hi Jerome,
> > ÃÂ
> > activatesignal(OUTPUT1) should work.ÃÂ Do you have Output1 configured in Ports&Pins Ouputs and enabled?
> > ÃÂ
> > Here is some Mach3 VB code that will blink a KFLOP LED if Mach3 Output1 is configured as Port1 Pin46
> > ÃÂ
> > activatesignal(OUTPUT1)
> > Sleep 1000
> > deactivatesignal(OUTPUT1)
> > Sleep 1000
> > activatesignal(OUTPUT1)
> > Sleep 1000
> > deactivatesignal(OUTPUT1)
> >
> > TK
> >
> > From: Fouijar <fouijar@>
> > To: DynoMotion@yahoogroups.com
> > Sent: Monday, May 7, 2012 2:34 PM
> > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> >
> >
> > ÃÂ
> > Hi Tom,
> >
> > I solved some issues I had in My M6 macro, I Use functions rather than Subs. I think that's not working to use a sub in main sub.
> > So I call functions inside the Main Sub.
> > I also use MsgBox to check what's wrong.
> > The file isn't faulty but doesn't work as it should. When I run the script the function, i.e., activatesignal(OUTPUT1) doesn't work. Maybe, I think, I have to use the NotifyPlugins() or this should be handled directly by the dynomotion plugin?
> >
> > The only visible action is the executed code()function, the Z axis moves as commanded. This is a good step in the right direction.
> >
> > If I have to use the NotifyPlugins() Then a previous thread I wrote about the best choice between C#, Vb or brains should probably be resumed to the C# choice, since the M6 could be executed in the Notify.c without handling communication issues. This is only IF.
> >
> > I posted My code in the txt file ATC_J_Debug.
> >
> > Thanks for your attention,
> >
> > Jerome
> >
> > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > >
> > > Hi Tom,
> > >
> > > I started debugging this evening, more to come tomorrow.
> > > I suppressed the compare function and made a test to know if the program has to run or leave.
> > > The air cylinder procedure was written to add a security check.
> > > The spindle is an AC asynchronous servo, the drive has a function I programmed and tuned to react at a particular entry and align the spindle with the tool holder (bt30).
> > >
> > > Thanks for your help,
> > >
> > > Jerome
> > >
> > > PS: I also write on the machsupport forum, this will give more visibility and resources.
> > >
> > > http://www.machsupport.com/forum/index.php/topic,21505.msg149510.html#msg149510
> > >
> > >
> > >
> > >
> > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > >
> > > > Hi Jerome,
> > > > ÃâÃÂ
> > > > Sorry I wasn't aware of the Flowchart.ÃâÃÂ You might point that out on the Mach3 foum as well so they will know what you are trying to do.
> > > > ÃâÃÂ
> > > > I wouldn't expect you to be able to just run it and get success.ÃâÃÂ Something that complex will need to be debugged step by step.
> > > > ÃâÃÂ
> > > > I don't think parenthesis makes any difference in those cases.
> > > > ÃâÃÂ
> > > > To debug you might change the:
> > > > ÃâÃÂ
> > > > NewTool = GetSelectedTool()
> > > > OldTool = GetCurrentTool()
> > > >
> > > > to
> > > > ÃâÃÂ
> > > > NewTool = 5
> > > > OldTool = 3
> > > > ÃâÃÂ
> > > > in order to force a known case and be able to run it right from the VB editor.ÃâÃÂ Use single step and verify each step does what you expect.
> > > > ÃâÃÂ
> > > > I think you should change the initial Compare to (because it wasn't waiting for anything):
> > > > ÃâÃÂ
> > > > 'Air Cylinder Homing
> > > > sub AirCyHome()
> > > > ÃâÃÂ DeactivateSignal(OUTPUT8)
> > > > ÃâÃÂ While (IsActive(INPUT1))
> > > > ÃâÃÂ ÃâÃÂ Sleep(10)
> > > > ÃâÃÂ Wend
> > > > end sub
> > > > ÃâÃÂ
> > > > ÃâÃÂ
> > > > Regarding the ToolChangerPos this does a bunch of testing but doesn't do anything
> > > > ÃâÃÂ
> > > > ÃâÃÂ
> > > > 'Carrousel air cylinder position check : Home, in Mvt and ToolChange
> > > > Function ToolChangerPos() As Boolean
> > > > ÃâÃÂ If IsActive(INPUT1)>IsActive(INPUT2)Then 'We are at Home Position
> > > > ÃâÃÂ ToolChangerPos = 0
> > > > ÃâÃÂ TCMove = False 'We are stopped
> > > > ÃâÃÂ
> > > > ÃâÃÂ ElseIf IsActive(INPUT1)<IsActive(INPUT2) Then
> > > > ÃâÃÂ ÃâÃÂ ToolChangerPos = 1
> > > > ÃâÃÂ ÃâÃÂ TCMove = False
> > > > ÃâÃÂ ÃâÃÂ Else
> > > > ÃâÃÂ ÃâÃÂ ToolChangerPos = -1
> > > > ÃâÃÂ ÃâÃÂ TCMove = True
> > > > ÃâÃÂ End If
> > > > End Function
> > > >
> > > > ÃâÃÂ
> > > > the SpindleHome function just sets an output bit.ÃâÃÂ I don't understand how you expect this to home the spindle.ÃâÃÂ What type of spindle do you have?
> > > > ÃâÃÂ
> > > > Regards
> > > > TK
> > > > ÃâÃÂ
> > > > ÃâÃÂ
> > > > ÃâÃÂ
> > > > ÃâÃÂ
> > > >
> > > > From: Fouijar <fouijar@>
> > > > To: DynoMotion@yahoogroups.com
> > > > Sent: Sunday, May 6, 2012 1:38 PM
> > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > >
> > > >
> > > > ÃâÃÂ
> > > > Hi Tom,
> > > >
> > > > I checked and compared files, I also made changes as proposed by mach users. The files mods proposed are:
> > > >
> > > > while(IsMoving())
> > > > Sleep(100)
> > > > code("G00 Z-35")'Move to the safe Z position for tool change
> > > > while (IsMoving())
> > > >
> > > > Should be this:
> > > >
> > > > Code "G00 Z-35"
> > > > While IsMoving()
> > > > Wend
> > > >
> > > > You don't need the Sleep() in the While IsMoving().
> > > >
> > > > Mods are proposed by ger21 on machsupport forum.
> > > >
> > > > I tried that, and your file without success.
> > > > I also tried a mix with(out) parenthesis :
> > > >
> > > > IsMoving()<>(IsMoving())
> > > > code("G00 Z-35")<>Code "G00 Z-35"
> > > >
> > > > Anyway I keep trying to find what's wrong.
> > > >
> > > > Jerome
> > > >
> > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > >
> > > > > Hi Tom,
> > > > >
> > > > > I know this is Mach3 related.
> > > > > But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
> > > > > I started a topic on the VB section of machsupport.
> > > > > http://www.machsupport.com/forum/index.php/topic,21505.0.html
> > > > >
> > > > > The flowchart is included in my files: ATC procedure.png
> > > > >
> > > > > The Compare function was created to check if the current tool is the same as the requested tool or new tool.
> > > > >
> > > > > Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
> > > > > I haven't checked your work yet.
> > > > >
> > > > > Regards,
> > > > >
> > > > > J.
> > > > >
> > > > >
> > > > >
> > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > >
> > > > > > Hi Jerome,
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > These are Mach3 and Mach3 VB questions.ÃÆ'Ã¢â¬Å¡ÃâÃÂ I fixed general typos and syntax errors so it now compiles and uploaded the file.
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > It will be up to you to understand itÃÆ'Ã¢â¬Å¡ÃâÃÂ and debug it.ÃÆ'Ã¢â¬Å¡ÃâÃÂ I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > Regards
> > > > > > TK
> > > > > >
> > > > > > From: Fouijar <fouijar@>
> > > > > > To: DynoMotion@yahoogroups.com
> > > > > > Sent: Sunday, May 6, 2012 9:09 AM
> > > > > > Subject: [DynoMotion] ATC M6 macro under mach3
> > > > > >
> > > > > >
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > Hi Tom, Ray,
> > > > > >
> > > > > > In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> > > > > > At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> > > > > > I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
> > > > > >
> > > > > > I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
> > > > > >
> > > > > > I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
> > > > > >
> > > > > > I don't know if I have to use an oemdro for the Getcurrentool()?
> > > > > >
> > > > > > So if you can explain me what's wrong I could go further.
> > > > > >
> > > > > > Thanks for your attention,
> > > > > >
> > > > > > Jerome
> > > > > >
> > > > >
> > > >
> > >
> >
>

Group: DynoMotion	Message: 4819	From: Tom Kerekes	Date: 5/7/2012
Subject: Re: ATC M6 macro under mach3

Hi Jerome,

Very unlikely there is a problem with the VB Interpreter :}

Did you realize that you can single step through your code?

Regards

Group: DynoMotion	Message: 4820	From: Fouijar	Date: 5/7/2012
Subject: Re: ATC M6 macro under mach3

Hi Tom,

I realize that but I use the included interpreter in Mach3 which is...
I did VB programming by the past, but more C# programming and I'm not very comfortable with programming since I haven't really had to do.

What is the debugger you use for VB macros?

J.

--- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@...> wrote:
>
> Hi Jerome,
> Â
> Very unlikely there is a problem with the VB Interpreter :}
> Â
> Did you realize that you can single step through your code?
> Â
> Regards
> TK
>
> From: Fouijar <fouijar@...>
> To: DynoMotion@yahoogroups.com
> Sent: Monday, May 7, 2012 3:56 PM
> Subject: [DynoMotion] Re: ATC M6 macro under mach3
>
>
> Â
> Hi Tom,
>
> Yes this the idea, but my actual problem is more about calling sequence not followed as it should.
>
> J.
>
> --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> >
> > Hi Jerome,
> > ÃÂ
> > I can't understand what you are saying, but to wait for an inputÃÂ I think you would do something like
> > ÃÂ
> > while (not IsActive(INPUT5))
> > ÃÂ Sleep(100)
> > wend
> > ÃÂ
> > TK
> >
> > From: Fouijar <fouijar@>
> > To: DynoMotion@yahoogroups.com
> > Sent: Monday, May 7, 2012 3:19 PM
> > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> >
> >
> > ÃÂ
> > Hi Tom,
> >
> > Outputs and inputs enabled.
> >
> > I was checking the bit numbers for inputs and outputs. I had the idea to use the WaitSystemFor(INPUT5), or a while(INPUT5=0)sleep(100)Wend
> > sequence. The idea is to have an output condition, or a temp.
> > INPUT5 is the limit switch indicating that the drawbar has released the tool.
> > I will test both and see.
> >
> > J.
> >
> > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > >
> > > Hi Jerome,
> > > ÃâÃÂ
> > > activatesignal(OUTPUT1) should work.ÃâÃÂ Do you have Output1 configured in Ports&Pins Ouputs and enabled?
> > > ÃâÃÂ
> > > Here is some Mach3 VB code that will blink a KFLOP LED if Mach3 Output1 is configured as Port1 Pin46
> > > ÃâÃÂ
> > > activatesignal(OUTPUT1)
> > > Sleep 1000
> > > deactivatesignal(OUTPUT1)
> > > Sleep 1000
> > > activatesignal(OUTPUT1)
> > > Sleep 1000
> > > deactivatesignal(OUTPUT1)
> > >
> > > TK
> > >
> > > From: Fouijar <fouijar@>
> > > To: DynoMotion@yahoogroups.com
> > > Sent: Monday, May 7, 2012 2:34 PM
> > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > >
> > >
> > > ÃâÃÂ
> > > Hi Tom,
> > >
> > > I solved some issues I had in My M6 macro, I Use functions rather than Subs. I think that's not working to use a sub in main sub.
> > > So I call functions inside the Main Sub.
> > > I also use MsgBox to check what's wrong.
> > > The file isn't faulty but doesn't work as it should. When I run the script the function, i.e., activatesignal(OUTPUT1) doesn't work. Maybe, I think, I have to use the NotifyPlugins() or this should be handled directly by the dynomotion plugin?
> > >
> > > The only visible action is the executed code()function, the Z axis moves as commanded. This is a good step in the right direction.
> > >
> > > If I have to use the NotifyPlugins() Then a previous thread I wrote about the best choice between C#, Vb or brains should probably be resumed to the C# choice, since the M6 could be executed in the Notify.c without handling communication issues. This is only IF.
> > >
> > > I posted My code in the txt file ATC_J_Debug.
> > >
> > > Thanks for your attention,
> > >
> > > Jerome
> > >
> > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > >
> > > > Hi Tom,
> > > >
> > > > I started debugging this evening, more to come tomorrow.
> > > > I suppressed the compare function and made a test to know if the program has to run or leave.
> > > > The air cylinder procedure was written to add a security check.
> > > > The spindle is an AC asynchronous servo, the drive has a function I programmed and tuned to react at a particular entry and align the spindle with the tool holder (bt30).
> > > >
> > > > Thanks for your help,
> > > >
> > > > Jerome
> > > >
> > > > PS: I also write on the machsupport forum, this will give more visibility and resources.
> > > >
> > > > http://www.machsupport.com/forum/index.php/topic,21505.msg149510.html#msg149510
> > > >
> > > >
> > > >
> > > >
> > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > >
> > > > > Hi Jerome,
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > Sorry I wasn't aware of the Flowchart.ÃÆ'Ã¢â¬Å¡ÃâÃÂ You might point that out on the Mach3 foum as well so they will know what you are trying to do.
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > I wouldn't expect you to be able to just run it and get success.ÃÆ'Ã¢â¬Å¡ÃâÃÂ Something that complex will need to be debugged step by step.
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > I don't think parenthesis makes any difference in those cases.
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > To debug you might change the:
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > NewTool = GetSelectedTool()
> > > > > OldTool = GetCurrentTool()
> > > > >
> > > > > to
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > NewTool = 5
> > > > > OldTool = 3
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > in order to force a known case and be able to run it right from the VB editor.ÃÆ'Ã¢â¬Å¡ÃâÃÂ Use single step and verify each step does what you expect.
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > I think you should change the initial Compare to (because it wasn't waiting for anything):
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > 'Air Cylinder Homing
> > > > > sub AirCyHome()
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ DeactivateSignal(OUTPUT8)
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ While (IsActive(INPUT1))
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã¢â¬Å¡ÃâÃÂ Sleep(10)
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ Wend
> > > > > end sub
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > Regarding the ToolChangerPos this does a bunch of testing but doesn't do anything
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > 'Carrousel air cylinder position check : Home, in Mvt and ToolChange
> > > > > Function ToolChangerPos() As Boolean
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ If IsActive(INPUT1)>IsActive(INPUT2)Then 'We are at Home Position
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = 0
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = False 'We are stopped
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ ElseIf IsActive(INPUT1)<IsActive(INPUT2) Then
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = 1
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = False
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã¢â¬Å¡ÃâÃÂ Else
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = -1
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = True
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ End If
> > > > > End Function
> > > > >
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > the SpindleHome function just sets an output bit.ÃÆ'Ã¢â¬Å¡ÃâÃÂ I don't understand how you expect this to home the spindle.ÃÆ'Ã¢â¬Å¡ÃâÃÂ What type of spindle do you have?
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > Regards
> > > > > TK
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > >
> > > > > From: Fouijar <fouijar@>
> > > > > To: DynoMotion@yahoogroups.com
> > > > > Sent: Sunday, May 6, 2012 1:38 PM
> > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > >
> > > > >
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > Hi Tom,
> > > > >
> > > > > I checked and compared files, I also made changes as proposed by mach users. The files mods proposed are:
> > > > >
> > > > > while(IsMoving())
> > > > > Sleep(100)
> > > > > code("G00 Z-35")'Move to the safe Z position for tool change
> > > > > while (IsMoving())
> > > > >
> > > > > Should be this:
> > > > >
> > > > > Code "G00 Z-35"
> > > > > While IsMoving()
> > > > > Wend
> > > > >
> > > > > You don't need the Sleep() in the While IsMoving().
> > > > >
> > > > > Mods are proposed by ger21 on machsupport forum.
> > > > >
> > > > > I tried that, and your file without success.
> > > > > I also tried a mix with(out) parenthesis :
> > > > >
> > > > > IsMoving()<>(IsMoving())
> > > > > code("G00 Z-35")<>Code "G00 Z-35"
> > > > >
> > > > > Anyway I keep trying to find what's wrong.
> > > > >
> > > > > Jerome
> > > > >
> > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > >
> > > > > > Hi Tom,
> > > > > >
> > > > > > I know this is Mach3 related.
> > > > > > But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
> > > > > > I started a topic on the VB section of machsupport.
> > > > > > http://www.machsupport.com/forum/index.php/topic,21505.0.html
> > > > > >
> > > > > > The flowchart is included in my files: ATC procedure.png
> > > > > >
> > > > > > The Compare function was created to check if the current tool is the same as the requested tool or new tool.
> > > > > >
> > > > > > Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
> > > > > > I haven't checked your work yet.
> > > > > >
> > > > > > Regards,
> > > > > >
> > > > > > J.
> > > > > >
> > > > > >
> > > > > >
> > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > >
> > > > > > > Hi Jerome,
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > These are Mach3 and Mach3 VB questions.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I fixed general typos and syntax errors so it now compiles and uploaded the file.
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > It will be up to you to understand itÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ and debug it.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > Regards
> > > > > > > TK
> > > > > > >
> > > > > > > From: Fouijar <fouijar@>
> > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > Sent: Sunday, May 6, 2012 9:09 AM
> > > > > > > Subject: [DynoMotion] ATC M6 macro under mach3
> > > > > > >
> > > > > > >
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > Hi Tom, Ray,
> > > > > > >
> > > > > > > In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> > > > > > > At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> > > > > > > I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
> > > > > > >
> > > > > > > I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
> > > > > > >
> > > > > > > I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
> > > > > > >
> > > > > > > I don't know if I have to use an oemdro for the Getcurrentool()?
> > > > > > >
> > > > > > > So if you can explain me what's wrong I could go further.
> > > > > > >
> > > > > > > Thanks for your attention,
> > > > > > >
> > > > > > > Jerome
> > > > > > >
> > > > > >
> > > > >
> > > >
> > >
> >
>

Group: DynoMotion	Message: 4821	From: Fouijar	Date: 5/7/2012
Subject: Re: ATC M6 macro under mach3

Re,

Something very annoying is the syntax error mentioned by the debugger when I Try to make a call in the Main sub. I read the VB macro programming reference book for mach3, there's a lot of such examples but none working for me, this is again ...
Ok ctrl+c ; ctrl+v isn't so complicated but why a function doesn't work!

J.

--- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@...> wrote:
>
> Hi Tom,
>
> I realize that but I use the included interpreter in Mach3 which is...
> I did VB programming by the past, but more C# programming and I'm not very comfortable with programming since I haven't really had to do.
>
> What is the debugger you use for VB macros?
>
> J.
>
> --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> >
> > Hi Jerome,
> > Â
> > Very unlikely there is a problem with the VB Interpreter :}
> > Â
> > Did you realize that you can single step through your code?
> > Â
> > Regards
> > TK
> >
> > From: Fouijar <fouijar@>
> > To: DynoMotion@yahoogroups.com
> > Sent: Monday, May 7, 2012 3:56 PM
> > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> >
> >
> > Â
> > Hi Tom,
> >
> > Yes this the idea, but my actual problem is more about calling sequence not followed as it should.
> >
> > J.
> >
> > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > >
> > > Hi Jerome,
> > > ÃÂ
> > > I can't understand what you are saying, but to wait for an inputÃÂ I think you would do something like
> > > ÃÂ
> > > while (not IsActive(INPUT5))
> > > ÃÂ Sleep(100)
> > > wend
> > > ÃÂ
> > > TK
> > >
> > > From: Fouijar <fouijar@>
> > > To: DynoMotion@yahoogroups.com
> > > Sent: Monday, May 7, 2012 3:19 PM
> > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > >
> > >
> > > ÃÂ
> > > Hi Tom,
> > >
> > > Outputs and inputs enabled.
> > >
> > > I was checking the bit numbers for inputs and outputs. I had the idea to use the WaitSystemFor(INPUT5), or a while(INPUT5=0)sleep(100)Wend
> > > sequence. The idea is to have an output condition, or a temp.
> > > INPUT5 is the limit switch indicating that the drawbar has released the tool.
> > > I will test both and see.
> > >
> > > J.
> > >
> > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > >
> > > > Hi Jerome,
> > > > ÃâÃÂ
> > > > activatesignal(OUTPUT1) should work.ÃâÃÂ Do you have Output1 configured in Ports&Pins Ouputs and enabled?
> > > > ÃâÃÂ
> > > > Here is some Mach3 VB code that will blink a KFLOP LED if Mach3 Output1 is configured as Port1 Pin46
> > > > ÃâÃÂ
> > > > activatesignal(OUTPUT1)
> > > > Sleep 1000
> > > > deactivatesignal(OUTPUT1)
> > > > Sleep 1000
> > > > activatesignal(OUTPUT1)
> > > > Sleep 1000
> > > > deactivatesignal(OUTPUT1)
> > > >
> > > > TK
> > > >
> > > > From: Fouijar <fouijar@>
> > > > To: DynoMotion@yahoogroups.com
> > > > Sent: Monday, May 7, 2012 2:34 PM
> > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > >
> > > >
> > > > ÃâÃÂ
> > > > Hi Tom,
> > > >
> > > > I solved some issues I had in My M6 macro, I Use functions rather than Subs. I think that's not working to use a sub in main sub.
> > > > So I call functions inside the Main Sub.
> > > > I also use MsgBox to check what's wrong.
> > > > The file isn't faulty but doesn't work as it should. When I run the script the function, i.e., activatesignal(OUTPUT1) doesn't work. Maybe, I think, I have to use the NotifyPlugins() or this should be handled directly by the dynomotion plugin?
> > > >
> > > > The only visible action is the executed code()function, the Z axis moves as commanded. This is a good step in the right direction.
> > > >
> > > > If I have to use the NotifyPlugins() Then a previous thread I wrote about the best choice between C#, Vb or brains should probably be resumed to the C# choice, since the M6 could be executed in the Notify.c without handling communication issues. This is only IF.
> > > >
> > > > I posted My code in the txt file ATC_J_Debug.
> > > >
> > > > Thanks for your attention,
> > > >
> > > > Jerome
> > > >
> > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > >
> > > > > Hi Tom,
> > > > >
> > > > > I started debugging this evening, more to come tomorrow.
> > > > > I suppressed the compare function and made a test to know if the program has to run or leave.
> > > > > The air cylinder procedure was written to add a security check.
> > > > > The spindle is an AC asynchronous servo, the drive has a function I programmed and tuned to react at a particular entry and align the spindle with the tool holder (bt30).
> > > > >
> > > > > Thanks for your help,
> > > > >
> > > > > Jerome
> > > > >
> > > > > PS: I also write on the machsupport forum, this will give more visibility and resources.
> > > > >
> > > > > http://www.machsupport.com/forum/index.php/topic,21505.msg149510.html#msg149510
> > > > >
> > > > >
> > > > >
> > > > >
> > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > >
> > > > > > Hi Jerome,
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > Sorry I wasn't aware of the Flowchart.ÃÆ'Ã¢â¬Å¡ÃâÃÂ You might point that out on the Mach3 foum as well so they will know what you are trying to do.
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > I wouldn't expect you to be able to just run it and get success.ÃÆ'Ã¢â¬Å¡ÃâÃÂ Something that complex will need to be debugged step by step.
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > I don't think parenthesis makes any difference in those cases.
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > To debug you might change the:
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > NewTool = GetSelectedTool()
> > > > > > OldTool = GetCurrentTool()
> > > > > >
> > > > > > to
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > NewTool = 5
> > > > > > OldTool = 3
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > in order to force a known case and be able to run it right from the VB editor.ÃÆ'Ã¢â¬Å¡ÃâÃÂ Use single step and verify each step does what you expect.
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > I think you should change the initial Compare to (because it wasn't waiting for anything):
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > 'Air Cylinder Homing
> > > > > > sub AirCyHome()
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ DeactivateSignal(OUTPUT8)
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ While (IsActive(INPUT1))
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã¢â¬Å¡ÃâÃÂ Sleep(10)
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ Wend
> > > > > > end sub
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > Regarding the ToolChangerPos this does a bunch of testing but doesn't do anything
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > 'Carrousel air cylinder position check : Home, in Mvt and ToolChange
> > > > > > Function ToolChangerPos() As Boolean
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ If IsActive(INPUT1)>IsActive(INPUT2)Then 'We are at Home Position
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = 0
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = False 'We are stopped
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ ElseIf IsActive(INPUT1)<IsActive(INPUT2) Then
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = 1
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = False
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã¢â¬Å¡ÃâÃÂ Else
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = -1
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = True
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ End If
> > > > > > End Function
> > > > > >
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > the SpindleHome function just sets an output bit.ÃÆ'Ã¢â¬Å¡ÃâÃÂ I don't understand how you expect this to home the spindle.ÃÆ'Ã¢â¬Å¡ÃâÃÂ What type of spindle do you have?
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > Regards
> > > > > > TK
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > >
> > > > > > From: Fouijar <fouijar@>
> > > > > > To: DynoMotion@yahoogroups.com
> > > > > > Sent: Sunday, May 6, 2012 1:38 PM
> > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > >
> > > > > >
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > Hi Tom,
> > > > > >
> > > > > > I checked and compared files, I also made changes as proposed by mach users. The files mods proposed are:
> > > > > >
> > > > > > while(IsMoving())
> > > > > > Sleep(100)
> > > > > > code("G00 Z-35")'Move to the safe Z position for tool change
> > > > > > while (IsMoving())
> > > > > >
> > > > > > Should be this:
> > > > > >
> > > > > > Code "G00 Z-35"
> > > > > > While IsMoving()
> > > > > > Wend
> > > > > >
> > > > > > You don't need the Sleep() in the While IsMoving().
> > > > > >
> > > > > > Mods are proposed by ger21 on machsupport forum.
> > > > > >
> > > > > > I tried that, and your file without success.
> > > > > > I also tried a mix with(out) parenthesis :
> > > > > >
> > > > > > IsMoving()<>(IsMoving())
> > > > > > code("G00 Z-35")<>Code "G00 Z-35"
> > > > > >
> > > > > > Anyway I keep trying to find what's wrong.
> > > > > >
> > > > > > Jerome
> > > > > >
> > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > >
> > > > > > > Hi Tom,
> > > > > > >
> > > > > > > I know this is Mach3 related.
> > > > > > > But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
> > > > > > > I started a topic on the VB section of machsupport.
> > > > > > > http://www.machsupport.com/forum/index.php/topic,21505.0.html
> > > > > > >
> > > > > > > The flowchart is included in my files: ATC procedure.png
> > > > > > >
> > > > > > > The Compare function was created to check if the current tool is the same as the requested tool or new tool.
> > > > > > >
> > > > > > > Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
> > > > > > > I haven't checked your work yet.
> > > > > > >
> > > > > > > Regards,
> > > > > > >
> > > > > > > J.
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > >
> > > > > > > > Hi Jerome,
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > These are Mach3 and Mach3 VB questions.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I fixed general typos and syntax errors so it now compiles and uploaded the file.
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > It will be up to you to understand itÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ and debug it.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > Regards
> > > > > > > > TK
> > > > > > > >
> > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > Sent: Sunday, May 6, 2012 9:09 AM
> > > > > > > > Subject: [DynoMotion] ATC M6 macro under mach3
> > > > > > > >
> > > > > > > >
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > Hi Tom, Ray,
> > > > > > > >
> > > > > > > > In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> > > > > > > > At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> > > > > > > > I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
> > > > > > > >
> > > > > > > > I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
> > > > > > > >
> > > > > > > > I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
> > > > > > > >
> > > > > > > > I don't know if I have to use an oemdro for the Getcurrentool()?
> > > > > > > >
> > > > > > > > So if you can explain me what's wrong I could go further.
> > > > > > > >
> > > > > > > > Thanks for your attention,
> > > > > > > >
> > > > > > > > Jerome
> > > > > > > >
> > > > > > >
> > > > > >
> > > > >
> > > >
> > >
> >
>

Group: DynoMotion	Message: 4822	From: Tom Kerekes	Date: 5/7/2012
Subject: Re: ATC M6 macro under mach3

Hi Jerome,

The included Mach3 interpreter allows you to single step as well as look at variables.

Operator | VB Script Editor

Regards

Group: DynoMotion	Message: 4823	From: Tom Kerekes	Date: 5/7/2012
Subject: Re: ATC M6 macro under mach3

Hi Jerome,

Look at the example I provided. I removed the sub main statement (no need for it). It makes the function or subroutine calls fine.

Regards

Group: DynoMotion	Message: 4824	From: Fouijar	Date: 5/7/2012
Subject: Re: ATC M6 macro under mach3

Hi Tom,

Many thanks for your help.

I uploaded the "partial" sequence since I still have to do some operations to reload the new tool etc.
I always have the syntax error, but will try as you did, without
main statement.

I'll have a check on your file now.

Regards, J

--- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@...> wrote:
>
> Hi Jerome,
> Â
> Look at the example I provided.Â I removed the sub main statement (no need for it).Â It makes the function or subroutine calls fine.
> Â
> Regards
> TK
>
> From: Fouijar <fouijar@...>
> To: DynoMotion@yahoogroups.com
> Sent: Monday, May 7, 2012 4:30 PM
> Subject: [DynoMotion] Re: ATC M6 macro under mach3
>
>
> Â
> Re,
>
> Something very annoying is the syntax error mentioned by the debugger when I Try to make a call in the Main sub. I read the VB macro programming reference book for mach3, there's a lot of such examples but none working for me, this is again ...
> Ok ctrl+c ; ctrl+v isn't so complicated but why a function doesn't work!
>
> J.
>
> --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> >
> > Hi Tom,
> >
> > I realize that but I use the included interpreter in Mach3 which is...
> > I did VB programming by the past, but more C# programming and I'm not very comfortable with programming since I haven't really had to do.
> >
> > What is the debugger you use for VB macros?
> >
> > J.
> >
> > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > >
> > > Hi Jerome,
> > > ÃÂ
> > > Very unlikely there is a problem with the VB Interpreter :}
> > > ÃÂ
> > > Did you realize that you can single step through your code?
> > > ÃÂ
> > > Regards
> > > TK
> > >
> > > From: Fouijar <fouijar@>
> > > To: DynoMotion@yahoogroups.com
> > > Sent: Monday, May 7, 2012 3:56 PM
> > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > >
> > >
> > > ÃÂ
> > > Hi Tom,
> > >
> > > Yes this the idea, but my actual problem is more about calling sequence not followed as it should.
> > >
> > > J.
> > >
> > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > >
> > > > Hi Jerome,
> > > > ÃâÃÂ
> > > > I can't understand what you are saying, but to wait for an inputÃâÃÂ I think you would do something like
> > > > ÃâÃÂ
> > > > while (not IsActive(INPUT5))
> > > > ÃâÃÂ Sleep(100)
> > > > wend
> > > > ÃâÃÂ
> > > > TK
> > > >
> > > > From: Fouijar <fouijar@>
> > > > To: DynoMotion@yahoogroups.com
> > > > Sent: Monday, May 7, 2012 3:19 PM
> > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > >
> > > >
> > > > ÃâÃÂ
> > > > Hi Tom,
> > > >
> > > > Outputs and inputs enabled.
> > > >
> > > > I was checking the bit numbers for inputs and outputs. I had the idea to use the WaitSystemFor(INPUT5), or a while(INPUT5=0)sleep(100)Wend
> > > > sequence. The idea is to have an output condition, or a temp.
> > > > INPUT5 is the limit switch indicating that the drawbar has released the tool.
> > > > I will test both and see.
> > > >
> > > > J.
> > > >
> > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > >
> > > > > Hi Jerome,
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > activatesignal(OUTPUT1) should work.ÃÆ'Ã¢â¬Å¡ÃâÃÂ Do you have Output1 configured in Ports&Pins Ouputs and enabled?
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > Here is some Mach3 VB code that will blink a KFLOP LED if Mach3 Output1 is configured as Port1 Pin46
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > activatesignal(OUTPUT1)
> > > > > Sleep 1000
> > > > > deactivatesignal(OUTPUT1)
> > > > > Sleep 1000
> > > > > activatesignal(OUTPUT1)
> > > > > Sleep 1000
> > > > > deactivatesignal(OUTPUT1)
> > > > >
> > > > > TK
> > > > >
> > > > > From: Fouijar <fouijar@>
> > > > > To: DynoMotion@yahoogroups.com
> > > > > Sent: Monday, May 7, 2012 2:34 PM
> > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > >
> > > > >
> > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > Hi Tom,
> > > > >
> > > > > I solved some issues I had in My M6 macro, I Use functions rather than Subs. I think that's not working to use a sub in main sub.
> > > > > So I call functions inside the Main Sub.
> > > > > I also use MsgBox to check what's wrong.
> > > > > The file isn't faulty but doesn't work as it should. When I run the script the function, i.e., activatesignal(OUTPUT1) doesn't work. Maybe, I think, I have to use the NotifyPlugins() or this should be handled directly by the dynomotion plugin?
> > > > >
> > > > > The only visible action is the executed code()function, the Z axis moves as commanded. This is a good step in the right direction.
> > > > >
> > > > > If I have to use the NotifyPlugins() Then a previous thread I wrote about the best choice between C#, Vb or brains should probably be resumed to the C# choice, since the M6 could be executed in the Notify.c without handling communication issues. This is only IF.
> > > > >
> > > > > I posted My code in the txt file ATC_J_Debug.
> > > > >
> > > > > Thanks for your attention,
> > > > >
> > > > > Jerome
> > > > >
> > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > >
> > > > > > Hi Tom,
> > > > > >
> > > > > > I started debugging this evening, more to come tomorrow.
> > > > > > I suppressed the compare function and made a test to know if the program has to run or leave.
> > > > > > The air cylinder procedure was written to add a security check.
> > > > > > The spindle is an AC asynchronous servo, the drive has a function I programmed and tuned to react at a particular entry and align the spindle with the tool holder (bt30).
> > > > > >
> > > > > > Thanks for your help,
> > > > > >
> > > > > > Jerome
> > > > > >
> > > > > > PS: I also write on the machsupport forum, this will give more visibility and resources.
> > > > > >
> > > > > > http://www.machsupport.com/forum/index.php/topic,21505.msg149510.html#msg149510
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > >
> > > > > > > Hi Jerome,
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > Sorry I wasn't aware of the Flowchart.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ You might point that out on the Mach3 foum as well so they will know what you are trying to do.
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > I wouldn't expect you to be able to just run it and get success.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Something that complex will need to be debugged step by step.
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > I don't think parenthesis makes any difference in those cases.
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > To debug you might change the:
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > NewTool = GetSelectedTool()
> > > > > > > OldTool = GetCurrentTool()
> > > > > > >
> > > > > > > to
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > NewTool = 5
> > > > > > > OldTool = 3
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > in order to force a known case and be able to run it right from the VB editor.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Use single step and verify each step does what you expect.
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > I think you should change the initial Compare to (because it wasn't waiting for anything):
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > 'Air Cylinder Homing
> > > > > > > sub AirCyHome()
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ DeactivateSignal(OUTPUT8)
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ While (IsActive(INPUT1))
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Sleep(10)
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Wend
> > > > > > > end sub
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > Regarding the ToolChangerPos this does a bunch of testing but doesn't do anything
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > 'Carrousel air cylinder position check : Home, in Mvt and ToolChange
> > > > > > > Function ToolChangerPos() As Boolean
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ If IsActive(INPUT1)>IsActive(INPUT2)Then 'We are at Home Position
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = 0
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = False 'We are stopped
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ElseIf IsActive(INPUT1)<IsActive(INPUT2) Then
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = 1
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = False
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Else
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = -1
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = True
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ End If
> > > > > > > End Function
> > > > > > >
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > the SpindleHome function just sets an output bit.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I don't understand how you expect this to home the spindle.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ What type of spindle do you have?
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > Regards
> > > > > > > TK
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > >
> > > > > > > From: Fouijar <fouijar@>
> > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > Sent: Sunday, May 6, 2012 1:38 PM
> > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > >
> > > > > > >
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > Hi Tom,
> > > > > > >
> > > > > > > I checked and compared files, I also made changes as proposed by mach users. The files mods proposed are:
> > > > > > >
> > > > > > > while(IsMoving())
> > > > > > > Sleep(100)
> > > > > > > code("G00 Z-35")'Move to the safe Z position for tool change
> > > > > > > while (IsMoving())
> > > > > > >
> > > > > > > Should be this:
> > > > > > >
> > > > > > > Code "G00 Z-35"
> > > > > > > While IsMoving()
> > > > > > > Wend
> > > > > > >
> > > > > > > You don't need the Sleep() in the While IsMoving().
> > > > > > >
> > > > > > > Mods are proposed by ger21 on machsupport forum.
> > > > > > >
> > > > > > > I tried that, and your file without success.
> > > > > > > I also tried a mix with(out) parenthesis :
> > > > > > >
> > > > > > > IsMoving()<>(IsMoving())
> > > > > > > code("G00 Z-35")<>Code "G00 Z-35"
> > > > > > >
> > > > > > > Anyway I keep trying to find what's wrong.
> > > > > > >
> > > > > > > Jerome
> > > > > > >
> > > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > > >
> > > > > > > > Hi Tom,
> > > > > > > >
> > > > > > > > I know this is Mach3 related.
> > > > > > > > But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
> > > > > > > > I started a topic on the VB section of machsupport.
> > > > > > > > http://www.machsupport.com/forum/index.php/topic,21505.0.html
> > > > > > > >
> > > > > > > > The flowchart is included in my files: ATC procedure.png
> > > > > > > >
> > > > > > > > The Compare function was created to check if the current tool is the same as the requested tool or new tool.
> > > > > > > >
> > > > > > > > Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
> > > > > > > > I haven't checked your work yet.
> > > > > > > >
> > > > > > > > Regards,
> > > > > > > >
> > > > > > > > J.
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > >
> > > > > > > > > Hi Jerome,
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > These are Mach3 and Mach3 VB questions.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I fixed general typos and syntax errors so it now compiles and uploaded the file.
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > It will be up to you to understand itÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ and debug it.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > Regards
> > > > > > > > > TK
> > > > > > > > >
> > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > Sent: Sunday, May 6, 2012 9:09 AM
> > > > > > > > > Subject: [DynoMotion] ATC M6 macro under mach3
> > > > > > > > >
> > > > > > > > >
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > Hi Tom, Ray,
> > > > > > > > >
> > > > > > > > > In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> > > > > > > > > At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> > > > > > > > > I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
> > > > > > > > >
> > > > > > > > > I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
> > > > > > > > >
> > > > > > > > > I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
> > > > > > > > >
> > > > > > > > > I don't know if I have to use an oemdro for the Getcurrentool()?
> > > > > > > > >
> > > > > > > > > So if you can explain me what's wrong I could go further.
> > > > > > > > >
> > > > > > > > > Thanks for your attention,
> > > > > > > > >
> > > > > > > > > Jerome
> > > > > > > > >
> > > > > > > >
> > > > > > >
> > > > > >
> > > > >
> > > >
> > >
> >
>

Group: DynoMotion	Message: 4825	From: Fouijar	Date: 5/7/2012
Subject: Re: ATC M6 macro under mach3

Hi Tom,

I don't see the example you're talking about.

J.

--- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@...> wrote:
>
> Hi Tom,
>
> Many thanks for your help.
>
> I uploaded the "partial" sequence since I still have to do some operations to reload the new tool etc.
> I always have the syntax error, but will try as you did, without
> main statement.
>
> I'll have a check on your file now.
>
> Regards, J
>
> --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> >
> > Hi Jerome,
> > Â
> > Look at the example I provided.Â I removed the sub main statement (no need for it).Â It makes the function or subroutine calls fine.
> > Â
> > Regards
> > TK
> >
> > From: Fouijar <fouijar@>
> > To: DynoMotion@yahoogroups.com
> > Sent: Monday, May 7, 2012 4:30 PM
> > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> >
> >
> > Â
> > Re,
> >
> > Something very annoying is the syntax error mentioned by the debugger when I Try to make a call in the Main sub. I read the VB macro programming reference book for mach3, there's a lot of such examples but none working for me, this is again ...
> > Ok ctrl+c ; ctrl+v isn't so complicated but why a function doesn't work!
> >
> > J.
> >
> > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > >
> > > Hi Tom,
> > >
> > > I realize that but I use the included interpreter in Mach3 which is...
> > > I did VB programming by the past, but more C# programming and I'm not very comfortable with programming since I haven't really had to do.
> > >
> > > What is the debugger you use for VB macros?
> > >
> > > J.
> > >
> > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > >
> > > > Hi Jerome,
> > > > ÃÂ
> > > > Very unlikely there is a problem with the VB Interpreter :}
> > > > ÃÂ
> > > > Did you realize that you can single step through your code?
> > > > ÃÂ
> > > > Regards
> > > > TK
> > > >
> > > > From: Fouijar <fouijar@>
> > > > To: DynoMotion@yahoogroups.com
> > > > Sent: Monday, May 7, 2012 3:56 PM
> > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > >
> > > >
> > > > ÃÂ
> > > > Hi Tom,
> > > >
> > > > Yes this the idea, but my actual problem is more about calling sequence not followed as it should.
> > > >
> > > > J.
> > > >
> > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > >
> > > > > Hi Jerome,
> > > > > ÃâÃÂ
> > > > > I can't understand what you are saying, but to wait for an inputÃâÃÂ I think you would do something like
> > > > > ÃâÃÂ
> > > > > while (not IsActive(INPUT5))
> > > > > ÃâÃÂ Sleep(100)
> > > > > wend
> > > > > ÃâÃÂ
> > > > > TK
> > > > >
> > > > > From: Fouijar <fouijar@>
> > > > > To: DynoMotion@yahoogroups.com
> > > > > Sent: Monday, May 7, 2012 3:19 PM
> > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > >
> > > > >
> > > > > ÃâÃÂ
> > > > > Hi Tom,
> > > > >
> > > > > Outputs and inputs enabled.
> > > > >
> > > > > I was checking the bit numbers for inputs and outputs. I had the idea to use the WaitSystemFor(INPUT5), or a while(INPUT5=0)sleep(100)Wend
> > > > > sequence. The idea is to have an output condition, or a temp.
> > > > > INPUT5 is the limit switch indicating that the drawbar has released the tool.
> > > > > I will test both and see.
> > > > >
> > > > > J.
> > > > >
> > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > >
> > > > > > Hi Jerome,
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > activatesignal(OUTPUT1) should work.ÃÆ'Ã¢â¬Å¡ÃâÃÂ Do you have Output1 configured in Ports&Pins Ouputs and enabled?
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > Here is some Mach3 VB code that will blink a KFLOP LED if Mach3 Output1 is configured as Port1 Pin46
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > activatesignal(OUTPUT1)
> > > > > > Sleep 1000
> > > > > > deactivatesignal(OUTPUT1)
> > > > > > Sleep 1000
> > > > > > activatesignal(OUTPUT1)
> > > > > > Sleep 1000
> > > > > > deactivatesignal(OUTPUT1)
> > > > > >
> > > > > > TK
> > > > > >
> > > > > > From: Fouijar <fouijar@>
> > > > > > To: DynoMotion@yahoogroups.com
> > > > > > Sent: Monday, May 7, 2012 2:34 PM
> > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > >
> > > > > >
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > Hi Tom,
> > > > > >
> > > > > > I solved some issues I had in My M6 macro, I Use functions rather than Subs. I think that's not working to use a sub in main sub.
> > > > > > So I call functions inside the Main Sub.
> > > > > > I also use MsgBox to check what's wrong.
> > > > > > The file isn't faulty but doesn't work as it should. When I run the script the function, i.e., activatesignal(OUTPUT1) doesn't work. Maybe, I think, I have to use the NotifyPlugins() or this should be handled directly by the dynomotion plugin?
> > > > > >
> > > > > > The only visible action is the executed code()function, the Z axis moves as commanded. This is a good step in the right direction.
> > > > > >
> > > > > > If I have to use the NotifyPlugins() Then a previous thread I wrote about the best choice between C#, Vb or brains should probably be resumed to the C# choice, since the M6 could be executed in the Notify.c without handling communication issues. This is only IF.
> > > > > >
> > > > > > I posted My code in the txt file ATC_J_Debug.
> > > > > >
> > > > > > Thanks for your attention,
> > > > > >
> > > > > > Jerome
> > > > > >
> > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > >
> > > > > > > Hi Tom,
> > > > > > >
> > > > > > > I started debugging this evening, more to come tomorrow.
> > > > > > > I suppressed the compare function and made a test to know if the program has to run or leave.
> > > > > > > The air cylinder procedure was written to add a security check.
> > > > > > > The spindle is an AC asynchronous servo, the drive has a function I programmed and tuned to react at a particular entry and align the spindle with the tool holder (bt30).
> > > > > > >
> > > > > > > Thanks for your help,
> > > > > > >
> > > > > > > Jerome
> > > > > > >
> > > > > > > PS: I also write on the machsupport forum, this will give more visibility and resources.
> > > > > > >
> > > > > > > http://www.machsupport.com/forum/index.php/topic,21505.msg149510.html#msg149510
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > >
> > > > > > > > Hi Jerome,
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > Sorry I wasn't aware of the Flowchart.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ You might point that out on the Mach3 foum as well so they will know what you are trying to do.
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > I wouldn't expect you to be able to just run it and get success.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Something that complex will need to be debugged step by step.
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > I don't think parenthesis makes any difference in those cases.
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > To debug you might change the:
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > NewTool = GetSelectedTool()
> > > > > > > > OldTool = GetCurrentTool()
> > > > > > > >
> > > > > > > > to
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > NewTool = 5
> > > > > > > > OldTool = 3
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > in order to force a known case and be able to run it right from the VB editor.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Use single step and verify each step does what you expect.
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > I think you should change the initial Compare to (because it wasn't waiting for anything):
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > 'Air Cylinder Homing
> > > > > > > > sub AirCyHome()
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ DeactivateSignal(OUTPUT8)
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ While (IsActive(INPUT1))
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Sleep(10)
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Wend
> > > > > > > > end sub
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > Regarding the ToolChangerPos this does a bunch of testing but doesn't do anything
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > 'Carrousel air cylinder position check : Home, in Mvt and ToolChange
> > > > > > > > Function ToolChangerPos() As Boolean
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ If IsActive(INPUT1)>IsActive(INPUT2)Then 'We are at Home Position
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = 0
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = False 'We are stopped
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ElseIf IsActive(INPUT1)<IsActive(INPUT2) Then
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = 1
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = False
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Else
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = -1
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = True
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ End If
> > > > > > > > End Function
> > > > > > > >
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > the SpindleHome function just sets an output bit.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I don't understand how you expect this to home the spindle.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ What type of spindle do you have?
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > Regards
> > > > > > > > TK
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > >
> > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > Sent: Sunday, May 6, 2012 1:38 PM
> > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > >
> > > > > > > >
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > Hi Tom,
> > > > > > > >
> > > > > > > > I checked and compared files, I also made changes as proposed by mach users. The files mods proposed are:
> > > > > > > >
> > > > > > > > while(IsMoving())
> > > > > > > > Sleep(100)
> > > > > > > > code("G00 Z-35")'Move to the safe Z position for tool change
> > > > > > > > while (IsMoving())
> > > > > > > >
> > > > > > > > Should be this:
> > > > > > > >
> > > > > > > > Code "G00 Z-35"
> > > > > > > > While IsMoving()
> > > > > > > > Wend
> > > > > > > >
> > > > > > > > You don't need the Sleep() in the While IsMoving().
> > > > > > > >
> > > > > > > > Mods are proposed by ger21 on machsupport forum.
> > > > > > > >
> > > > > > > > I tried that, and your file without success.
> > > > > > > > I also tried a mix with(out) parenthesis :
> > > > > > > >
> > > > > > > > IsMoving()<>(IsMoving())
> > > > > > > > code("G00 Z-35")<>Code "G00 Z-35"
> > > > > > > >
> > > > > > > > Anyway I keep trying to find what's wrong.
> > > > > > > >
> > > > > > > > Jerome
> > > > > > > >
> > > > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > > > >
> > > > > > > > > Hi Tom,
> > > > > > > > >
> > > > > > > > > I know this is Mach3 related.
> > > > > > > > > But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
> > > > > > > > > I started a topic on the VB section of machsupport.
> > > > > > > > > http://www.machsupport.com/forum/index.php/topic,21505.0.html
> > > > > > > > >
> > > > > > > > > The flowchart is included in my files: ATC procedure.png
> > > > > > > > >
> > > > > > > > > The Compare function was created to check if the current tool is the same as the requested tool or new tool.
> > > > > > > > >
> > > > > > > > > Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
> > > > > > > > > I haven't checked your work yet.
> > > > > > > > >
> > > > > > > > > Regards,
> > > > > > > > >
> > > > > > > > > J.
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > >
> > > > > > > > > > Hi Jerome,
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > These are Mach3 and Mach3 VB questions.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I fixed general typos and syntax errors so it now compiles and uploaded the file.
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > It will be up to you to understand itÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ and debug it.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > Regards
> > > > > > > > > > TK
> > > > > > > > > >
> > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > Sent: Sunday, May 6, 2012 9:09 AM
> > > > > > > > > > Subject: [DynoMotion] ATC M6 macro under mach3
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > Hi Tom, Ray,
> > > > > > > > > >
> > > > > > > > > > In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> > > > > > > > > > At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> > > > > > > > > > I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
> > > > > > > > > >
> > > > > > > > > > I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
> > > > > > > > > >
> > > > > > > > > > I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
> > > > > > > > > >
> > > > > > > > > > I don't know if I have to use an oemdro for the Getcurrentool()?
> > > > > > > > > >
> > > > > > > > > > So if you can explain me what's wrong I could go further.
> > > > > > > > > >
> > > > > > > > > > Thanks for your attention,
> > > > > > > > > >
> > > > > > > > > > Jerome
> > > > > > > > > >
> > > > > > > > >
> > > > > > > >
> > > > > > >
> > > > > >
> > > > >
> > > >
> > >
> >
>

Group: DynoMotion	Message: 4827	From: Tom Kerekes	Date: 5/7/2012
Subject: Re: ATC M6 macro under mach3

Hi Jerome,

Opps I think I uploaded the original file rather than the one with my syntax fixes.

I re-up-loaded it. See M6StartTK.m1s in your folder.

Regards

Group: DynoMotion	Message: 4831	From: Fouijar	Date: 5/8/2012
Subject: Re: ATC M6 macro under mach3

Hi Tom,

I did the comparison between the file you sent me back and the file I initially uploaded, they are basically the same. Are you sure it's the good file you sent me yesterday?

Regards,

Jerome

PS: On a Win7 system it doesn't show any errors. I read a thread about that on machsupport forum and somebody said it's because Win7 is more fault tolerant...

--- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@...> wrote:
>
> Hi Jerome,
> Â
> Opps I think I uploaded the original file rather than the one with my syntax fixes.
> Â
> I re-up-loaded it.Â See M6StartTK.m1s in your folder.
> Â
> Regards
> TK
> Â
> Â
>
> From: Fouijar <fouijar@...>
> To: DynoMotion@yahoogroups.com
> Sent: Monday, May 7, 2012 5:24 PM
> Subject: [DynoMotion] Re: ATC M6 macro under mach3
>
>
> Â
> Hi Tom,
>
> I don't see the example you're talking about.
>
> J.
>
> --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> >
> > Hi Tom,
> >
> > Many thanks for your help.
> >
> > I uploaded the "partial" sequence since I still have to do some operations to reload the new tool etc.
> > I always have the syntax error, but will try as you did, without
> > main statement.
> >
> > I'll have a check on your file now.
> >
> > Regards, J
> >
> > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > >
> > > Hi Jerome,
> > > ÃÂ
> > > Look at the example I provided.ÃÂ I removed the sub main statement (no need for it).ÃÂ It makes the function or subroutine calls fine.
> > > ÃÂ
> > > Regards
> > > TK
> > >
> > > From: Fouijar <fouijar@>
> > > To: DynoMotion@yahoogroups.com
> > > Sent: Monday, May 7, 2012 4:30 PM
> > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > >
> > >
> > > ÃÂ
> > > Re,
> > >
> > > Something very annoying is the syntax error mentioned by the debugger when I Try to make a call in the Main sub. I read the VB macro programming reference book for mach3, there's a lot of such examples but none working for me, this is again ...
> > > Ok ctrl+c ; ctrl+v isn't so complicated but why a function doesn't work!
> > >
> > > J.
> > >
> > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > >
> > > > Hi Tom,
> > > >
> > > > I realize that but I use the included interpreter in Mach3 which is...
> > > > I did VB programming by the past, but more C# programming and I'm not very comfortable with programming since I haven't really had to do.
> > > >
> > > > What is the debugger you use for VB macros?
> > > >
> > > > J.
> > > >
> > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > >
> > > > > Hi Jerome,
> > > > > ÃâÃÂ
> > > > > Very unlikely there is a problem with the VB Interpreter :}
> > > > > ÃâÃÂ
> > > > > Did you realize that you can single step through your code?
> > > > > ÃâÃÂ
> > > > > Regards
> > > > > TK
> > > > >
> > > > > From: Fouijar <fouijar@>
> > > > > To: DynoMotion@yahoogroups.com
> > > > > Sent: Monday, May 7, 2012 3:56 PM
> > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > >
> > > > >
> > > > > ÃâÃÂ
> > > > > Hi Tom,
> > > > >
> > > > > Yes this the idea, but my actual problem is more about calling sequence not followed as it should.
> > > > >
> > > > > J.
> > > > >
> > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > >
> > > > > > Hi Jerome,
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > I can't understand what you are saying, but to wait for an inputÃÆ'Ã¢â¬Å¡ÃâÃÂ I think you would do something like
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > while (not IsActive(INPUT5))
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ Sleep(100)
> > > > > > wend
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > TK
> > > > > >
> > > > > > From: Fouijar <fouijar@>
> > > > > > To: DynoMotion@yahoogroups.com
> > > > > > Sent: Monday, May 7, 2012 3:19 PM
> > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > >
> > > > > >
> > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > Hi Tom,
> > > > > >
> > > > > > Outputs and inputs enabled.
> > > > > >
> > > > > > I was checking the bit numbers for inputs and outputs. I had the idea to use the WaitSystemFor(INPUT5), or a while(INPUT5=0)sleep(100)Wend
> > > > > > sequence. The idea is to have an output condition, or a temp.
> > > > > > INPUT5 is the limit switch indicating that the drawbar has released the tool.
> > > > > > I will test both and see.
> > > > > >
> > > > > > J.
> > > > > >
> > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > >
> > > > > > > Hi Jerome,
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > activatesignal(OUTPUT1) should work.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Do you have Output1 configured in Ports&Pins Ouputs and enabled?
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > Here is some Mach3 VB code that will blink a KFLOP LED if Mach3 Output1 is configured as Port1 Pin46
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > activatesignal(OUTPUT1)
> > > > > > > Sleep 1000
> > > > > > > deactivatesignal(OUTPUT1)
> > > > > > > Sleep 1000
> > > > > > > activatesignal(OUTPUT1)
> > > > > > > Sleep 1000
> > > > > > > deactivatesignal(OUTPUT1)
> > > > > > >
> > > > > > > TK
> > > > > > >
> > > > > > > From: Fouijar <fouijar@>
> > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > Sent: Monday, May 7, 2012 2:34 PM
> > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > >
> > > > > > >
> > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > Hi Tom,
> > > > > > >
> > > > > > > I solved some issues I had in My M6 macro, I Use functions rather than Subs. I think that's not working to use a sub in main sub.
> > > > > > > So I call functions inside the Main Sub.
> > > > > > > I also use MsgBox to check what's wrong.
> > > > > > > The file isn't faulty but doesn't work as it should. When I run the script the function, i.e., activatesignal(OUTPUT1) doesn't work. Maybe, I think, I have to use the NotifyPlugins() or this should be handled directly by the dynomotion plugin?
> > > > > > >
> > > > > > > The only visible action is the executed code()function, the Z axis moves as commanded. This is a good step in the right direction.
> > > > > > >
> > > > > > > If I have to use the NotifyPlugins() Then a previous thread I wrote about the best choice between C#, Vb or brains should probably be resumed to the C# choice, since the M6 could be executed in the Notify.c without handling communication issues. This is only IF.
> > > > > > >
> > > > > > > I posted My code in the txt file ATC_J_Debug.
> > > > > > >
> > > > > > > Thanks for your attention,
> > > > > > >
> > > > > > > Jerome
> > > > > > >
> > > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > > >
> > > > > > > > Hi Tom,
> > > > > > > >
> > > > > > > > I started debugging this evening, more to come tomorrow.
> > > > > > > > I suppressed the compare function and made a test to know if the program has to run or leave.
> > > > > > > > The air cylinder procedure was written to add a security check.
> > > > > > > > The spindle is an AC asynchronous servo, the drive has a function I programmed and tuned to react at a particular entry and align the spindle with the tool holder (bt30).
> > > > > > > >
> > > > > > > > Thanks for your help,
> > > > > > > >
> > > > > > > > Jerome
> > > > > > > >
> > > > > > > > PS: I also write on the machsupport forum, this will give more visibility and resources.
> > > > > > > >
> > > > > > > > http://www.machsupport.com/forum/index.php/topic,21505.msg149510.html#msg149510
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > >
> > > > > > > > > Hi Jerome,
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > Sorry I wasn't aware of the Flowchart.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ You might point that out on the Mach3 foum as well so they will know what you are trying to do.
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > I wouldn't expect you to be able to just run it and get success.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Something that complex will need to be debugged step by step.
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > I don't think parenthesis makes any difference in those cases.
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > To debug you might change the:
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > NewTool = GetSelectedTool()
> > > > > > > > > OldTool = GetCurrentTool()
> > > > > > > > >
> > > > > > > > > to
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > NewTool = 5
> > > > > > > > > OldTool = 3
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > in order to force a known case and be able to run it right from the VB editor.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Use single step and verify each step does what you expect.
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > I think you should change the initial Compare to (because it wasn't waiting for anything):
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > 'Air Cylinder Homing
> > > > > > > > > sub AirCyHome()
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ DeactivateSignal(OUTPUT8)
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ While (IsActive(INPUT1))
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Sleep(10)
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Wend
> > > > > > > > > end sub
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > Regarding the ToolChangerPos this does a bunch of testing but doesn't do anything
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > 'Carrousel air cylinder position check : Home, in Mvt and ToolChange
> > > > > > > > > Function ToolChangerPos() As Boolean
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ If IsActive(INPUT1)>IsActive(INPUT2)Then 'We are at Home Position
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = 0
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = False 'We are stopped
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ElseIf IsActive(INPUT1)<IsActive(INPUT2) Then
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = 1
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = False
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Else
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = -1
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = True
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ End If
> > > > > > > > > End Function
> > > > > > > > >
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > the SpindleHome function just sets an output bit.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I don't understand how you expect this to home the spindle.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ What type of spindle do you have?
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > Regards
> > > > > > > > > TK
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > >
> > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > Sent: Sunday, May 6, 2012 1:38 PM
> > > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > > >
> > > > > > > > >
> > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > Hi Tom,
> > > > > > > > >
> > > > > > > > > I checked and compared files, I also made changes as proposed by mach users. The files mods proposed are:
> > > > > > > > >
> > > > > > > > > while(IsMoving())
> > > > > > > > > Sleep(100)
> > > > > > > > > code("G00 Z-35")'Move to the safe Z position for tool change
> > > > > > > > > while (IsMoving())
> > > > > > > > >
> > > > > > > > > Should be this:
> > > > > > > > >
> > > > > > > > > Code "G00 Z-35"
> > > > > > > > > While IsMoving()
> > > > > > > > > Wend
> > > > > > > > >
> > > > > > > > > You don't need the Sleep() in the While IsMoving().
> > > > > > > > >
> > > > > > > > > Mods are proposed by ger21 on machsupport forum.
> > > > > > > > >
> > > > > > > > > I tried that, and your file without success.
> > > > > > > > > I also tried a mix with(out) parenthesis :
> > > > > > > > >
> > > > > > > > > IsMoving()<>(IsMoving())
> > > > > > > > > code("G00 Z-35")<>Code "G00 Z-35"
> > > > > > > > >
> > > > > > > > > Anyway I keep trying to find what's wrong.
> > > > > > > > >
> > > > > > > > > Jerome
> > > > > > > > >
> > > > > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > > > > >
> > > > > > > > > > Hi Tom,
> > > > > > > > > >
> > > > > > > > > > I know this is Mach3 related.
> > > > > > > > > > But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
> > > > > > > > > > I started a topic on the VB section of machsupport.
> > > > > > > > > > http://www.machsupport.com/forum/index.php/topic,21505.0.html
> > > > > > > > > >
> > > > > > > > > > The flowchart is included in my files: ATC procedure.png
> > > > > > > > > >
> > > > > > > > > > The Compare function was created to check if the current tool is the same as the requested tool or new tool.
> > > > > > > > > >
> > > > > > > > > > Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
> > > > > > > > > > I haven't checked your work yet.
> > > > > > > > > >
> > > > > > > > > > Regards,
> > > > > > > > > >
> > > > > > > > > > J.
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > > >
> > > > > > > > > > > Hi Jerome,
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > These are Mach3 and Mach3 VB questions.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I fixed general typos and syntax errors so it now compiles and uploaded the file.
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > It will be up to you to understand itÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ and debug it.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > Regards
> > > > > > > > > > > TK
> > > > > > > > > > >
> > > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > > Sent: Sunday, May 6, 2012 9:09 AM
> > > > > > > > > > > Subject: [DynoMotion] ATC M6 macro under mach3
> > > > > > > > > > >
> > > > > > > > > > >
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > Hi Tom, Ray,
> > > > > > > > > > >
> > > > > > > > > > > In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> > > > > > > > > > > At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> > > > > > > > > > > I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
> > > > > > > > > > >
> > > > > > > > > > > I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
> > > > > > > > > > >
> > > > > > > > > > > I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
> > > > > > > > > > >
> > > > > > > > > > > I don't know if I have to use an oemdro for the Getcurrentool()?
> > > > > > > > > > >
> > > > > > > > > > > So if you can explain me what's wrong I could go further.
> > > > > > > > > > >
> > > > > > > > > > > Thanks for your attention,
> > > > > > > > > > >
> > > > > > > > > > > Jerome
> > > > > > > > > > >
> > > > > > > > > >
> > > > > > > > >
> > > > > > > >
> > > > > > >
> > > > > >
> > > > >
> > > >
> > >
> >
>

Group: DynoMotion	Message: 4832	From: Fouijar	Date: 5/8/2012
Subject: Re: ATC M6 macro under mach3

Hi Tom,

Forget about that, I did a false comparison with the old file... my bad.

Regards,

J

--- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@...> wrote:
>
> Hi Tom,
>
> I did the comparison between the file you sent me back and the file I initially uploaded, they are basically the same. Are you sure it's the good file you sent me yesterday?
>
> Regards,
>
> Jerome
>
> PS: On a Win7 system it doesn't show any errors. I read a thread about that on machsupport forum and somebody said it's because Win7 is more fault tolerant...
>
> --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> >
> > Hi Jerome,
> > Â
> > Opps I think I uploaded the original file rather than the one with my syntax fixes.
> > Â
> > I re-up-loaded it.Â See M6StartTK.m1s in your folder.
> > Â
> > Regards
> > TK
> > Â
> > Â
> >
> > From: Fouijar <fouijar@>
> > To: DynoMotion@yahoogroups.com
> > Sent: Monday, May 7, 2012 5:24 PM
> > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> >
> >
> > Â
> > Hi Tom,
> >
> > I don't see the example you're talking about.
> >
> > J.
> >
> > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > >
> > > Hi Tom,
> > >
> > > Many thanks for your help.
> > >
> > > I uploaded the "partial" sequence since I still have to do some operations to reload the new tool etc.
> > > I always have the syntax error, but will try as you did, without
> > > main statement.
> > >
> > > I'll have a check on your file now.
> > >
> > > Regards, J
> > >
> > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > >
> > > > Hi Jerome,
> > > > ÃÂ
> > > > Look at the example I provided.ÃÂ I removed the sub main statement (no need for it).ÃÂ It makes the function or subroutine calls fine.
> > > > ÃÂ
> > > > Regards
> > > > TK
> > > >
> > > > From: Fouijar <fouijar@>
> > > > To: DynoMotion@yahoogroups.com
> > > > Sent: Monday, May 7, 2012 4:30 PM
> > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > >
> > > >
> > > > ÃÂ
> > > > Re,
> > > >
> > > > Something very annoying is the syntax error mentioned by the debugger when I Try to make a call in the Main sub. I read the VB macro programming reference book for mach3, there's a lot of such examples but none working for me, this is again ...
> > > > Ok ctrl+c ; ctrl+v isn't so complicated but why a function doesn't work!
> > > >
> > > > J.
> > > >
> > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > >
> > > > > Hi Tom,
> > > > >
> > > > > I realize that but I use the included interpreter in Mach3 which is...
> > > > > I did VB programming by the past, but more C# programming and I'm not very comfortable with programming since I haven't really had to do.
> > > > >
> > > > > What is the debugger you use for VB macros?
> > > > >
> > > > > J.
> > > > >
> > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > >
> > > > > > Hi Jerome,
> > > > > > ÃâÃÂ
> > > > > > Very unlikely there is a problem with the VB Interpreter :}
> > > > > > ÃâÃÂ
> > > > > > Did you realize that you can single step through your code?
> > > > > > ÃâÃÂ
> > > > > > Regards
> > > > > > TK
> > > > > >
> > > > > > From: Fouijar <fouijar@>
> > > > > > To: DynoMotion@yahoogroups.com
> > > > > > Sent: Monday, May 7, 2012 3:56 PM
> > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > >
> > > > > >
> > > > > > ÃâÃÂ
> > > > > > Hi Tom,
> > > > > >
> > > > > > Yes this the idea, but my actual problem is more about calling sequence not followed as it should.
> > > > > >
> > > > > > J.
> > > > > >
> > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > >
> > > > > > > Hi Jerome,
> > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > I can't understand what you are saying, but to wait for an inputÃÆ'Ã¢â¬Å¡ÃâÃÂ I think you would do something like
> > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > while (not IsActive(INPUT5))
> > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ Sleep(100)
> > > > > > > wend
> > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > TK
> > > > > > >
> > > > > > > From: Fouijar <fouijar@>
> > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > Sent: Monday, May 7, 2012 3:19 PM
> > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > >
> > > > > > >
> > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > Hi Tom,
> > > > > > >
> > > > > > > Outputs and inputs enabled.
> > > > > > >
> > > > > > > I was checking the bit numbers for inputs and outputs. I had the idea to use the WaitSystemFor(INPUT5), or a while(INPUT5=0)sleep(100)Wend
> > > > > > > sequence. The idea is to have an output condition, or a temp.
> > > > > > > INPUT5 is the limit switch indicating that the drawbar has released the tool.
> > > > > > > I will test both and see.
> > > > > > >
> > > > > > > J.
> > > > > > >
> > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > >
> > > > > > > > Hi Jerome,
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > activatesignal(OUTPUT1) should work.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Do you have Output1 configured in Ports&Pins Ouputs and enabled?
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > Here is some Mach3 VB code that will blink a KFLOP LED if Mach3 Output1 is configured as Port1 Pin46
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > activatesignal(OUTPUT1)
> > > > > > > > Sleep 1000
> > > > > > > > deactivatesignal(OUTPUT1)
> > > > > > > > Sleep 1000
> > > > > > > > activatesignal(OUTPUT1)
> > > > > > > > Sleep 1000
> > > > > > > > deactivatesignal(OUTPUT1)
> > > > > > > >
> > > > > > > > TK
> > > > > > > >
> > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > Sent: Monday, May 7, 2012 2:34 PM
> > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > >
> > > > > > > >
> > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > Hi Tom,
> > > > > > > >
> > > > > > > > I solved some issues I had in My M6 macro, I Use functions rather than Subs. I think that's not working to use a sub in main sub.
> > > > > > > > So I call functions inside the Main Sub.
> > > > > > > > I also use MsgBox to check what's wrong.
> > > > > > > > The file isn't faulty but doesn't work as it should. When I run the script the function, i.e., activatesignal(OUTPUT1) doesn't work. Maybe, I think, I have to use the NotifyPlugins() or this should be handled directly by the dynomotion plugin?
> > > > > > > >
> > > > > > > > The only visible action is the executed code()function, the Z axis moves as commanded. This is a good step in the right direction.
> > > > > > > >
> > > > > > > > If I have to use the NotifyPlugins() Then a previous thread I wrote about the best choice between C#, Vb or brains should probably be resumed to the C# choice, since the M6 could be executed in the Notify.c without handling communication issues. This is only IF.
> > > > > > > >
> > > > > > > > I posted My code in the txt file ATC_J_Debug.
> > > > > > > >
> > > > > > > > Thanks for your attention,
> > > > > > > >
> > > > > > > > Jerome
> > > > > > > >
> > > > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > > > >
> > > > > > > > > Hi Tom,
> > > > > > > > >
> > > > > > > > > I started debugging this evening, more to come tomorrow.
> > > > > > > > > I suppressed the compare function and made a test to know if the program has to run or leave.
> > > > > > > > > The air cylinder procedure was written to add a security check.
> > > > > > > > > The spindle is an AC asynchronous servo, the drive has a function I programmed and tuned to react at a particular entry and align the spindle with the tool holder (bt30).
> > > > > > > > >
> > > > > > > > > Thanks for your help,
> > > > > > > > >
> > > > > > > > > Jerome
> > > > > > > > >
> > > > > > > > > PS: I also write on the machsupport forum, this will give more visibility and resources.
> > > > > > > > >
> > > > > > > > > http://www.machsupport.com/forum/index.php/topic,21505.msg149510.html#msg149510
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > > > >
> > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > >
> > > > > > > > > > Hi Jerome,
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > Sorry I wasn't aware of the Flowchart.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ You might point that out on the Mach3 foum as well so they will know what you are trying to do.
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > I wouldn't expect you to be able to just run it and get success.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Something that complex will need to be debugged step by step.
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > I don't think parenthesis makes any difference in those cases.
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > To debug you might change the:
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > NewTool = GetSelectedTool()
> > > > > > > > > > OldTool = GetCurrentTool()
> > > > > > > > > >
> > > > > > > > > > to
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > NewTool = 5
> > > > > > > > > > OldTool = 3
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > in order to force a known case and be able to run it right from the VB editor.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Use single step and verify each step does what you expect.
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > I think you should change the initial Compare to (because it wasn't waiting for anything):
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > 'Air Cylinder Homing
> > > > > > > > > > sub AirCyHome()
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ DeactivateSignal(OUTPUT8)
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ While (IsActive(INPUT1))
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Sleep(10)
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Wend
> > > > > > > > > > end sub
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > Regarding the ToolChangerPos this does a bunch of testing but doesn't do anything
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > 'Carrousel air cylinder position check : Home, in Mvt and ToolChange
> > > > > > > > > > Function ToolChangerPos() As Boolean
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ If IsActive(INPUT1)>IsActive(INPUT2)Then 'We are at Home Position
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = 0
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = False 'We are stopped
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ElseIf IsActive(INPUT1)<IsActive(INPUT2) Then
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = 1
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = False
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Else
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = -1
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = True
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ End If
> > > > > > > > > > End Function
> > > > > > > > > >
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > the SpindleHome function just sets an output bit.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I don't understand how you expect this to home the spindle.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ What type of spindle do you have?
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > Regards
> > > > > > > > > > TK
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > >
> > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > Sent: Sunday, May 6, 2012 1:38 PM
> > > > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > Hi Tom,
> > > > > > > > > >
> > > > > > > > > > I checked and compared files, I also made changes as proposed by mach users. The files mods proposed are:
> > > > > > > > > >
> > > > > > > > > > while(IsMoving())
> > > > > > > > > > Sleep(100)
> > > > > > > > > > code("G00 Z-35")'Move to the safe Z position for tool change
> > > > > > > > > > while (IsMoving())
> > > > > > > > > >
> > > > > > > > > > Should be this:
> > > > > > > > > >
> > > > > > > > > > Code "G00 Z-35"
> > > > > > > > > > While IsMoving()
> > > > > > > > > > Wend
> > > > > > > > > >
> > > > > > > > > > You don't need the Sleep() in the While IsMoving().
> > > > > > > > > >
> > > > > > > > > > Mods are proposed by ger21 on machsupport forum.
> > > > > > > > > >
> > > > > > > > > > I tried that, and your file without success.
> > > > > > > > > > I also tried a mix with(out) parenthesis :
> > > > > > > > > >
> > > > > > > > > > IsMoving()<>(IsMoving())
> > > > > > > > > > code("G00 Z-35")<>Code "G00 Z-35"
> > > > > > > > > >
> > > > > > > > > > Anyway I keep trying to find what's wrong.
> > > > > > > > > >
> > > > > > > > > > Jerome
> > > > > > > > > >
> > > > > > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > > > > > >
> > > > > > > > > > > Hi Tom,
> > > > > > > > > > >
> > > > > > > > > > > I know this is Mach3 related.
> > > > > > > > > > > But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
> > > > > > > > > > > I started a topic on the VB section of machsupport.
> > > > > > > > > > > http://www.machsupport.com/forum/index.php/topic,21505.0.html
> > > > > > > > > > >
> > > > > > > > > > > The flowchart is included in my files: ATC procedure.png
> > > > > > > > > > >
> > > > > > > > > > > The Compare function was created to check if the current tool is the same as the requested tool or new tool.
> > > > > > > > > > >
> > > > > > > > > > > Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
> > > > > > > > > > > I haven't checked your work yet.
> > > > > > > > > > >
> > > > > > > > > > > Regards,
> > > > > > > > > > >
> > > > > > > > > > > J.
> > > > > > > > > > >
> > > > > > > > > > >
> > > > > > > > > > >
> > > > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > > > >
> > > > > > > > > > > > Hi Jerome,
> > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > > These are Mach3 and Mach3 VB questions.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I fixed general typos and syntax errors so it now compiles and uploaded the file.
> > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > > It will be up to you to understand itÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ and debug it.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > > The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > > Regards
> > > > > > > > > > > > TK
> > > > > > > > > > > >
> > > > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > > > Sent: Sunday, May 6, 2012 9:09 AM
> > > > > > > > > > > > Subject: [DynoMotion] ATC M6 macro under mach3
> > > > > > > > > > > >
> > > > > > > > > > > >
> > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > > Hi Tom, Ray,
> > > > > > > > > > > >
> > > > > > > > > > > > In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> > > > > > > > > > > > At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> > > > > > > > > > > > I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
> > > > > > > > > > > >
> > > > > > > > > > > > I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
> > > > > > > > > > > >
> > > > > > > > > > > > I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
> > > > > > > > > > > >
> > > > > > > > > > > > I don't know if I have to use an oemdro for the Getcurrentool()?
> > > > > > > > > > > >
> > > > > > > > > > > > So if you can explain me what's wrong I could go further.
> > > > > > > > > > > >
> > > > > > > > > > > > Thanks for your attention,
> > > > > > > > > > > >
> > > > > > > > > > > > Jerome
> > > > > > > > > > > >
> > > > > > > > > > >
> > > > > > > > > >
> > > > > > > > >
> > > > > > > >
> > > > > > >
> > > > > >
> > > > >
> > > >
> > >
> >
>

Group: DynoMotion	Message: 4834	From: Fouijar	Date: 5/8/2012
Subject: Re: ATC M6 macro under mach3

Hi Tom,

Well, I use your file and the (de)activatesignal(OUTPUT#) function works for the leds on the Kflop board but not for outputting on Kanalog. If I command directly by Kmotion, it works perfectly.
I checked the read state of mach3 inputs, it's also working fine as it is in Kmotion.

I think something is wrong between Mach and plugin. Do you have an idea?

Regards,
Jerome

--- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@...> wrote:
>
> Hi Tom,
>
> Forget about that, I did a false comparison with the old file... my bad.
>
> Regards,
>
> J
>
> --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> >
> > Hi Tom,
> >
> > I did the comparison between the file you sent me back and the file I initially uploaded, they are basically the same. Are you sure it's the good file you sent me yesterday?
> >
> > Regards,
> >
> > Jerome
> >
> > PS: On a Win7 system it doesn't show any errors. I read a thread about that on machsupport forum and somebody said it's because Win7 is more fault tolerant...
> >
> > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > >
> > > Hi Jerome,
> > > Â
> > > Opps I think I uploaded the original file rather than the one with my syntax fixes.
> > > Â
> > > I re-up-loaded it.Â See M6StartTK.m1s in your folder.
> > > Â
> > > Regards
> > > TK
> > > Â
> > > Â
> > >
> > > From: Fouijar <fouijar@>
> > > To: DynoMotion@yahoogroups.com
> > > Sent: Monday, May 7, 2012 5:24 PM
> > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > >
> > >
> > > Â
> > > Hi Tom,
> > >
> > > I don't see the example you're talking about.
> > >
> > > J.
> > >
> > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > >
> > > > Hi Tom,
> > > >
> > > > Many thanks for your help.
> > > >
> > > > I uploaded the "partial" sequence since I still have to do some operations to reload the new tool etc.
> > > > I always have the syntax error, but will try as you did, without
> > > > main statement.
> > > >
> > > > I'll have a check on your file now.
> > > >
> > > > Regards, J
> > > >
> > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > >
> > > > > Hi Jerome,
> > > > > ÃÂ
> > > > > Look at the example I provided.ÃÂ I removed the sub main statement (no need for it).ÃÂ It makes the function or subroutine calls fine.
> > > > > ÃÂ
> > > > > Regards
> > > > > TK
> > > > >
> > > > > From: Fouijar <fouijar@>
> > > > > To: DynoMotion@yahoogroups.com
> > > > > Sent: Monday, May 7, 2012 4:30 PM
> > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > >
> > > > >
> > > > > ÃÂ
> > > > > Re,
> > > > >
> > > > > Something very annoying is the syntax error mentioned by the debugger when I Try to make a call in the Main sub. I read the VB macro programming reference book for mach3, there's a lot of such examples but none working for me, this is again ...
> > > > > Ok ctrl+c ; ctrl+v isn't so complicated but why a function doesn't work!
> > > > >
> > > > > J.
> > > > >
> > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > >
> > > > > > Hi Tom,
> > > > > >
> > > > > > I realize that but I use the included interpreter in Mach3 which is...
> > > > > > I did VB programming by the past, but more C# programming and I'm not very comfortable with programming since I haven't really had to do.
> > > > > >
> > > > > > What is the debugger you use for VB macros?
> > > > > >
> > > > > > J.
> > > > > >
> > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > >
> > > > > > > Hi Jerome,
> > > > > > > ÃâÃÂ
> > > > > > > Very unlikely there is a problem with the VB Interpreter :}
> > > > > > > ÃâÃÂ
> > > > > > > Did you realize that you can single step through your code?
> > > > > > > ÃâÃÂ
> > > > > > > Regards
> > > > > > > TK
> > > > > > >
> > > > > > > From: Fouijar <fouijar@>
> > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > Sent: Monday, May 7, 2012 3:56 PM
> > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > >
> > > > > > >
> > > > > > > ÃâÃÂ
> > > > > > > Hi Tom,
> > > > > > >
> > > > > > > Yes this the idea, but my actual problem is more about calling sequence not followed as it should.
> > > > > > >
> > > > > > > J.
> > > > > > >
> > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > >
> > > > > > > > Hi Jerome,
> > > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > I can't understand what you are saying, but to wait for an inputÃÆ'Ã¢â¬Å¡ÃâÃÂ I think you would do something like
> > > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > while (not IsActive(INPUT5))
> > > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ Sleep(100)
> > > > > > > > wend
> > > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > TK
> > > > > > > >
> > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > Sent: Monday, May 7, 2012 3:19 PM
> > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > >
> > > > > > > >
> > > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > Hi Tom,
> > > > > > > >
> > > > > > > > Outputs and inputs enabled.
> > > > > > > >
> > > > > > > > I was checking the bit numbers for inputs and outputs. I had the idea to use the WaitSystemFor(INPUT5), or a while(INPUT5=0)sleep(100)Wend
> > > > > > > > sequence. The idea is to have an output condition, or a temp.
> > > > > > > > INPUT5 is the limit switch indicating that the drawbar has released the tool.
> > > > > > > > I will test both and see.
> > > > > > > >
> > > > > > > > J.
> > > > > > > >
> > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > >
> > > > > > > > > Hi Jerome,
> > > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > activatesignal(OUTPUT1) should work.ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Do you have Output1 configured in Ports&Pins Ouputs and enabled?
> > > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > Here is some Mach3 VB code that will blink a KFLOP LED if Mach3 Output1 is configured as Port1 Pin46
> > > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > activatesignal(OUTPUT1)
> > > > > > > > > Sleep 1000
> > > > > > > > > deactivatesignal(OUTPUT1)
> > > > > > > > > Sleep 1000
> > > > > > > > > activatesignal(OUTPUT1)
> > > > > > > > > Sleep 1000
> > > > > > > > > deactivatesignal(OUTPUT1)
> > > > > > > > >
> > > > > > > > > TK
> > > > > > > > >
> > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > Sent: Monday, May 7, 2012 2:34 PM
> > > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > > >
> > > > > > > > >
> > > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > Hi Tom,
> > > > > > > > >
> > > > > > > > > I solved some issues I had in My M6 macro, I Use functions rather than Subs. I think that's not working to use a sub in main sub.
> > > > > > > > > So I call functions inside the Main Sub.
> > > > > > > > > I also use MsgBox to check what's wrong.
> > > > > > > > > The file isn't faulty but doesn't work as it should. When I run the script the function, i.e., activatesignal(OUTPUT1) doesn't work. Maybe, I think, I have to use the NotifyPlugins() or this should be handled directly by the dynomotion plugin?
> > > > > > > > >
> > > > > > > > > The only visible action is the executed code()function, the Z axis moves as commanded. This is a good step in the right direction.
> > > > > > > > >
> > > > > > > > > If I have to use the NotifyPlugins() Then a previous thread I wrote about the best choice between C#, Vb or brains should probably be resumed to the C# choice, since the M6 could be executed in the Notify.c without handling communication issues. This is only IF.
> > > > > > > > >
> > > > > > > > > I posted My code in the txt file ATC_J_Debug.
> > > > > > > > >
> > > > > > > > > Thanks for your attention,
> > > > > > > > >
> > > > > > > > > Jerome
> > > > > > > > >
> > > > > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > > > > >
> > > > > > > > > > Hi Tom,
> > > > > > > > > >
> > > > > > > > > > I started debugging this evening, more to come tomorrow.
> > > > > > > > > > I suppressed the compare function and made a test to know if the program has to run or leave.
> > > > > > > > > > The air cylinder procedure was written to add a security check.
> > > > > > > > > > The spindle is an AC asynchronous servo, the drive has a function I programmed and tuned to react at a particular entry and align the spindle with the tool holder (bt30).
> > > > > > > > > >
> > > > > > > > > > Thanks for your help,
> > > > > > > > > >
> > > > > > > > > > Jerome
> > > > > > > > > >
> > > > > > > > > > PS: I also write on the machsupport forum, this will give more visibility and resources.
> > > > > > > > > >
> > > > > > > > > > http://www.machsupport.com/forum/index.php/topic,21505.msg149510.html#msg149510
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > > >
> > > > > > > > > > > Hi Jerome,
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > Sorry I wasn't aware of the Flowchart.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ You might point that out on the Mach3 foum as well so they will know what you are trying to do.
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > I wouldn't expect you to be able to just run it and get success.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Something that complex will need to be debugged step by step.
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > I don't think parenthesis makes any difference in those cases.
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > To debug you might change the:
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > NewTool = GetSelectedTool()
> > > > > > > > > > > OldTool = GetCurrentTool()
> > > > > > > > > > >
> > > > > > > > > > > to
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > NewTool = 5
> > > > > > > > > > > OldTool = 3
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > in order to force a known case and be able to run it right from the VB editor.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Use single step and verify each step does what you expect.
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > I think you should change the initial Compare to (because it wasn't waiting for anything):
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > 'Air Cylinder Homing
> > > > > > > > > > > sub AirCyHome()
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ DeactivateSignal(OUTPUT8)
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ While (IsActive(INPUT1))
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Sleep(10)
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Wend
> > > > > > > > > > > end sub
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > Regarding the ToolChangerPos this does a bunch of testing but doesn't do anything
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > 'Carrousel air cylinder position check : Home, in Mvt and ToolChange
> > > > > > > > > > > Function ToolChangerPos() As Boolean
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ If IsActive(INPUT1)>IsActive(INPUT2)Then 'We are at Home Position
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = 0
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = False 'We are stopped
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ElseIf IsActive(INPUT1)<IsActive(INPUT2) Then
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = 1
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = False
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ Else
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ToolChangerPos = -1
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ TCMove = True
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ End If
> > > > > > > > > > > End Function
> > > > > > > > > > >
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > the SpindleHome function just sets an output bit.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I don't understand how you expect this to home the spindle.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ What type of spindle do you have?
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > Regards
> > > > > > > > > > > TK
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > >
> > > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > > Sent: Sunday, May 6, 2012 1:38 PM
> > > > > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > > > > >
> > > > > > > > > > >
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > Hi Tom,
> > > > > > > > > > >
> > > > > > > > > > > I checked and compared files, I also made changes as proposed by mach users. The files mods proposed are:
> > > > > > > > > > >
> > > > > > > > > > > while(IsMoving())
> > > > > > > > > > > Sleep(100)
> > > > > > > > > > > code("G00 Z-35")'Move to the safe Z position for tool change
> > > > > > > > > > > while (IsMoving())
> > > > > > > > > > >
> > > > > > > > > > > Should be this:
> > > > > > > > > > >
> > > > > > > > > > > Code "G00 Z-35"
> > > > > > > > > > > While IsMoving()
> > > > > > > > > > > Wend
> > > > > > > > > > >
> > > > > > > > > > > You don't need the Sleep() in the While IsMoving().
> > > > > > > > > > >
> > > > > > > > > > > Mods are proposed by ger21 on machsupport forum.
> > > > > > > > > > >
> > > > > > > > > > > I tried that, and your file without success.
> > > > > > > > > > > I also tried a mix with(out) parenthesis :
> > > > > > > > > > >
> > > > > > > > > > > IsMoving()<>(IsMoving())
> > > > > > > > > > > code("G00 Z-35")<>Code "G00 Z-35"
> > > > > > > > > > >
> > > > > > > > > > > Anyway I keep trying to find what's wrong.
> > > > > > > > > > >
> > > > > > > > > > > Jerome
> > > > > > > > > > >
> > > > > > > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > > > > > > >
> > > > > > > > > > > > Hi Tom,
> > > > > > > > > > > >
> > > > > > > > > > > > I know this is Mach3 related.
> > > > > > > > > > > > But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
> > > > > > > > > > > > I started a topic on the VB section of machsupport.
> > > > > > > > > > > > http://www.machsupport.com/forum/index.php/topic,21505.0.html
> > > > > > > > > > > >
> > > > > > > > > > > > The flowchart is included in my files: ATC procedure.png
> > > > > > > > > > > >
> > > > > > > > > > > > The Compare function was created to check if the current tool is the same as the requested tool or new tool.
> > > > > > > > > > > >
> > > > > > > > > > > > Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
> > > > > > > > > > > > I haven't checked your work yet.
> > > > > > > > > > > >
> > > > > > > > > > > > Regards,
> > > > > > > > > > > >
> > > > > > > > > > > > J.
> > > > > > > > > > > >
> > > > > > > > > > > >
> > > > > > > > > > > >
> > > > > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > > > > >
> > > > > > > > > > > > > Hi Jerome,
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > > > These are Mach3 and Mach3 VB questions.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I fixed general typos and syntax errors so it now compiles and uploaded the file.
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > > > It will be up to you to understand itÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ and debug it.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > > > The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > > > Regards
> > > > > > > > > > > > > TK
> > > > > > > > > > > > >
> > > > > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > > > > Sent: Sunday, May 6, 2012 9:09 AM
> > > > > > > > > > > > > Subject: [DynoMotion] ATC M6 macro under mach3
> > > > > > > > > > > > >
> > > > > > > > > > > > >
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Â 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ
> > > > > > > > > > > > > Hi Tom, Ray,
> > > > > > > > > > > > >
> > > > > > > > > > > > > In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> > > > > > > > > > > > > At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> > > > > > > > > > > > > I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
> > > > > > > > > > > > >
> > > > > > > > > > > > > I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
> > > > > > > > > > > > >
> > > > > > > > > > > > > I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
> > > > > > > > > > > > >
> > > > > > > > > > > > > I don't know if I have to use an oemdro for the Getcurrentool()?
> > > > > > > > > > > > >
> > > > > > > > > > > > > So if you can explain me what's wrong I could go further.
> > > > > > > > > > > > >
> > > > > > > > > > > > > Thanks for your attention,
> > > > > > > > > > > > >
> > > > > > > > > > > > > Jerome
> > > > > > > > > > > > >
> > > > > > > > > > > >
> > > > > > > > > > >
> > > > > > > > > >
> > > > > > > > >
> > > > > > > >
> > > > > > >
> > > > > >
> > > > >
> > > >
> > >
> >
>

Group: DynoMotion	Message: 4835	From: TK	Date: 5/8/2012
Subject: Re: ATC M6 macro under mach3

Oh for io numbers > 127 you need to subtract 128 and specify port #2.

On May 8, 2012, at 8:28 AM, "Fouijar" <fouijar@...> wrote:

Hi Tom,

Well, I use your file and the (de)activatesignal(OUTPUT#) function works for the leds on the Kflop board but not for outputting on Kanalog. If I command directly by Kmotion, it works perfectly.
I checked the read state of mach3 inputs, it's also working fine as it is in Kmotion.

I think something is wrong between Mach and plugin. Do you have an idea?

Regards,
Jerome

--- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@...> wrote:
>
> Hi Tom,
>
> Forget about that, I did a false comparison with the old file... my bad.
>
> Regards,
>
> J
>
> --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> >
> > Hi Tom,
> >
> > I did the comparison between the file you sent me back and the file I initially uploaded, they are basically the same. Are you sure it's the good file you sent me yesterday?
> >
> > Regards,
> >
> > Jerome
> >
> > PS: On a Win7 system it doesn't show any errors. I read a thread about that on machsupport forum and somebody said it's because Win7 is more fault tolerant...
> >
> > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > >
> > > Hi Jerome,
> > > Â
> > > Opps I think I uploaded the original file rather than the one with my syntax fixes.
> > > Â
> > > I re-up-loaded it.Â See M6StartTK.m1s in your folder.
> > > Â
> > > Regards
> > > TK
> > > Â
> > > Â
> > >
> > > From: Fouijar <fouijar@>
> > > To: DynoMotion@yahoogroups.com
> > > Sent: Monday, May 7, 2012 5:24 PM
> > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > >
> > >
> > > Â
> > > Hi Tom,
> > >
> > > I don't see the example you're talking about.
> > >
> > > J.
> > >
> > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > >
> > > > Hi Tom,
> > > >
> > > > Many thanks for your help.
> > > >
> > > > I uploaded the "partial" sequence since I still have to do some operations to reload the new tool etc.
> > > > I always have the syntax error, but will try as you did, without
> > > > main statement.
> > > >
> > > > I'll have a check on your file now.
> > > >
> > > > Regards, J
> > > >
> > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > >
> > > > > Hi Jerome,
> > > > > Ã‚Â
> > > > > Look at the example I provided.Ã‚Â I removed the sub main statement (no need for it).Ã‚Â It makes the function or subroutine calls fine.
> > > > > Ã‚Â
> > > > > Regards
> > > > > TK
> > > > >
> > > > > From: Fouijar <fouijar@>
> > > > > To: DynoMotion@yahoogroups.com
> > > > > Sent: Monday, May 7, 2012 4:30 PM
> > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > >
> > > > >
> > > > > Ã‚Â
> > > > > Re,
> > > > >
> > > > > Something very annoying is the syntax error mentioned by the debugger when I Try to make a call in the Main sub. I read the VB macro programming reference book for mach3, there's a lot of such examples but none working for me, this is again ...
> > > > > Ok ctrl+c ; ctrl+v isn't so complicated but why a function doesn't work!
> > > > >
> > > > > J.
> > > > >
> > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > >
> > > > > > Hi Tom,
> > > > > >
> > > > > > I realize that but I use the included interpreter in Mach3 which is...
> > > > > > I did VB programming by the past, but more C# programming and I'm not very comfortable with programming since I haven't really had to do.
> > > > > >
> > > > > > What is the debugger you use for VB macros?
> > > > > >
> > > > > > J.
> > > > > >
> > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > >
> > > > > > > Hi Jerome,
> > > > > > > Ãƒâ€šÃ‚Â
> > > > > > > Very unlikely there is a problem with the VB Interpreter :}
> > > > > > > Ãƒâ€šÃ‚Â
> > > > > > > Did you realize that you can single step through your code?
> > > > > > > Ãƒâ€šÃ‚Â
> > > > > > > Regards
> > > > > > > TK
> > > > > > >
> > > > > > > From: Fouijar <fouijar@>
> > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > Sent: Monday, May 7, 2012 3:56 PM
> > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > >
> > > > > > >
> > > > > > > Ãƒâ€šÃ‚Â
> > > > > > > Hi Tom,
> > > > > > >
> > > > > > > Yes this the idea, but my actual problem is more about calling sequence not followed as it should.
> > > > > > >
> > > > > > > J.
> > > > > > >
> > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > >
> > > > > > > > Hi Jerome,
> > > > > > > > ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > I can't understand what you are saying, but to wait for an inputÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â I think you would do something like
> > > > > > > > ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > while (not IsActive(INPUT5))
> > > > > > > > ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â Sleep(100)
> > > > > > > > wend
> > > > > > > > ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > TK
> > > > > > > >
> > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > Sent: Monday, May 7, 2012 3:19 PM
> > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > >
> > > > > > > >
> > > > > > > > ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > Hi Tom,
> > > > > > > >
> > > > > > > > Outputs and inputs enabled.
> > > > > > > >
> > > > > > > > I was checking the bit numbers for inputs and outputs. I had the idea to use the WaitSystemFor(INPUT5), or a while(INPUT5=0)sleep(100)Wend
> > > > > > > > sequence. The idea is to have an output condition, or a temp.
> > > > > > > > INPUT5 is the limit switch indicating that the drawbar has released the tool.
> > > > > > > > I will test both and see.
> > > > > > > >
> > > > > > > > J.
> > > > > > > >
> > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > >
> > > > > > > > > Hi Jerome,
> > > > > > > > > ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > activatesignal(OUTPUT1) should work.ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â Do you have Output1 configured in Ports&Pins Ouputs and enabled?
> > > > > > > > > ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > Here is some Mach3 VB code that will blink a KFLOP LED if Mach3 Output1 is configured as Port1 Pin46
> > > > > > > > > ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > activatesignal(OUTPUT1)
> > > > > > > > > Sleep 1000
> > > > > > > > > deactivatesignal(OUTPUT1)
> > > > > > > > > Sleep 1000
> > > > > > > > > activatesignal(OUTPUT1)
> > > > > > > > > Sleep 1000
> > > > > > > > > deactivatesignal(OUTPUT1)
> > > > > > > > >
> > > > > > > > > TK
> > > > > > > > >
> > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > Sent: Monday, May 7, 2012 2:34 PM
> > > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > > >
> > > > > > > > >
> > > > > > > > > ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > Hi Tom,
> > > > > > > > >
> > > > > > > > > I solved some issues I had in My M6 macro, I Use functions rather than Subs. I think that's not working to use a sub in main sub.
> > > > > > > > > So I call functions inside the Main Sub.
> > > > > > > > > I also use MsgBox to check what's wrong.
> > > > > > > > > The file isn't faulty but doesn't work as it should. When I run the script the function, i.e., activatesignal(OUTPUT1) doesn't work. Maybe, I think, I have to use the NotifyPlugins() or this should be handled directly by the dynomotion plugin?
> > > > > > > > >
> > > > > > > > > The only visible action is the executed code()function, the Z axis moves as commanded. This is a good step in the right direction.
> > > > > > > > >
> > > > > > > > > If I have to use the NotifyPlugins() Then a previous thread I wrote about the best choice between C#, Vb or brains should probably be resumed to the C# choice, since the M6 could be executed in the Notify.c without handling communication issues. This is only IF.
> > > > > > > > >
> > > > > > > > > I posted My code in the txt file ATC_J_Debug.
> > > > > > > > >
> > > > > > > > > Thanks for your attention,
> > > > > > > > >
> > > > > > > > > Jerome
> > > > > > > > >
> > > > > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > > > > >
> > > > > > > > > > Hi Tom,
> > > > > > > > > >
> > > > > > > > > > I started debugging this evening, more to come tomorrow.
> > > > > > > > > > I suppressed the compare function and made a test to know if the program has to run or leave.
> > > > > > > > > > The air cylinder procedure was written to add a security check.
> > > > > > > > > > The spindle is an AC asynchronous servo, the drive has a function I programmed and tuned to react at a particular entry and align the spindle with the tool holder (bt30).
> > > > > > > > > >
> > > > > > > > > > Thanks for your help,
> > > > > > > > > >
> > > > > > > > > > Jerome
> > > > > > > > > >
> > > > > > > > > > PS: I also write on the machsupport forum, this will give more visibility and resources.
> > > > > > > > > >
> > > > > > > > > > http://www.machsupport.com/forum/index.php/topic,21505.msg149510.html#msg149510
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > > >
> > > > > > > > > > > Hi Jerome,
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > Sorry I wasn't aware of the Flowchart.ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â You might point that out on the Mach3 foum as well so they will know what you are trying to do.
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > I wouldn't expect you to be able to just run it and get success.ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â Something that complex will need to be debugged step by step.
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > I don't think parenthesis makes any difference in those cases.
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > To debug you might change the:
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > NewTool = GetSelectedTool()
> > > > > > > > > > > OldTool = GetCurrentTool()
> > > > > > > > > > >
> > > > > > > > > > > to
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > NewTool = 5
> > > > > > > > > > > OldTool = 3
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > in order to force a known case and be able to run it right from the VB editor.ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â Use single step and verify each step does what you expect.
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > I think you should change the initial Compare to (because it wasn't waiting for anything):
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > 'Air Cylinder Homing
> > > > > > > > > > > sub AirCyHome()
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â DeactivateSignal(OUTPUT8)
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â While (IsActive(INPUT1))
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â Sleep(10)
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â Wend
> > > > > > > > > > > end sub
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > Regarding the ToolChangerPos this does a bunch of testing but doesn't do anything
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > 'Carrousel air cylinder position check : Home, in Mvt and ToolChange
> > > > > > > > > > > Function ToolChangerPos() As Boolean
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â If IsActive(INPUT1)>IsActive(INPUT2)Then 'We are at Home Position
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â ToolChangerPos = 0
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â TCMove = False 'We are stopped
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â ElseIf IsActive(INPUT1)<IsActive(INPUT2) Then
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â ToolChangerPos = 1
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â TCMove = False
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â Else
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â ToolChangerPos = -1
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â TCMove = True
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â End If
> > > > > > > > > > > End Function
> > > > > > > > > > >
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > the SpindleHome function just sets an output bit.ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â I don't understand how you expect this to home the spindle.ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â What type of spindle do you have?
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > Regards
> > > > > > > > > > > TK
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > >
> > > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > > Sent: Sunday, May 6, 2012 1:38 PM
> > > > > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > > > > >
> > > > > > > > > > >
> > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > Hi Tom,
> > > > > > > > > > >
> > > > > > > > > > > I checked and compared files, I also made changes as proposed by mach users. The files mods proposed are:
> > > > > > > > > > >
> > > > > > > > > > > while(IsMoving())
> > > > > > > > > > > Sleep(100)
> > > > > > > > > > > code("G00 Z-35")'Move to the safe Z position for tool change
> > > > > > > > > > > while (IsMoving())
> > > > > > > > > > >
> > > > > > > > > > > Should be this:
> > > > > > > > > > >
> > > > > > > > > > > Code "G00 Z-35"
> > > > > > > > > > > While IsMoving()
> > > > > > > > > > > Wend
> > > > > > > > > > >
> > > > > > > > > > > You don't need the Sleep() in the While IsMoving().
> > > > > > > > > > >
> > > > > > > > > > > Mods are proposed by ger21 on machsupport forum.
> > > > > > > > > > >
> > > > > > > > > > > I tried that, and your file without success.
> > > > > > > > > > > I also tried a mix with(out) parenthesis :
> > > > > > > > > > >
> > > > > > > > > > > IsMoving()<>(IsMoving())
> > > > > > > > > > > code("G00 Z-35")<>Code "G00 Z-35"
> > > > > > > > > > >
> > > > > > > > > > > Anyway I keep trying to find what's wrong.
> > > > > > > > > > >
> > > > > > > > > > > Jerome
> > > > > > > > > > >
> > > > > > > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > > > > > > >
> > > > > > > > > > > > Hi Tom,
> > > > > > > > > > > >
> > > > > > > > > > > > I know this is Mach3 related.
> > > > > > > > > > > > But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
> > > > > > > > > > > > I started a topic on the VB section of machsupport.
> > > > > > > > > > > > http://www.machsupport.com/forum/index.php/topic,21505.0.html
> > > > > > > > > > > >
> > > > > > > > > > > > The flowchart is included in my files: ATC procedure.png
> > > > > > > > > > > >
> > > > > > > > > > > > The Compare function was created to check if the current tool is the same as the requested tool or new tool.
> > > > > > > > > > > >
> > > > > > > > > > > > Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
> > > > > > > > > > > > I haven't checked your work yet.
> > > > > > > > > > > >
> > > > > > > > > > > > Regards,
> > > > > > > > > > > >
> > > > > > > > > > > > J.
> > > > > > > > > > > >
> > > > > > > > > > > >
> > > > > > > > > > > >
> > > > > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > > > > >
> > > > > > > > > > > > > Hi Jerome,
> > > > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã¢â‚¬Â 'ÃƒÆ'Ã†'Ãƒâ€šÃ‚Â¢ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡Ãƒâ€šÃ‚Â¬ÃƒÆ'Ã¢â‚¬Â¦Ãƒâ€šÃ‚Â¡ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > > > These are Mach3 and Mach3 VB questions.ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã¢â‚¬Â 'ÃƒÆ'Ã†'Ãƒâ€šÃ‚Â¢ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡Ãƒâ€šÃ‚Â¬ÃƒÆ'Ã¢â‚¬Â¦Ãƒâ€šÃ‚Â¡ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â I fixed general typos and syntax errors so it now compiles and uploaded the file.
> > > > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã¢â‚¬Â 'ÃƒÆ'Ã†'Ãƒâ€šÃ‚Â¢ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡Ãƒâ€šÃ‚Â¬ÃƒÆ'Ã¢â‚¬Â¦Ãƒâ€šÃ‚Â¡ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > > > It will be up to you to understand itÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã¢â‚¬Â 'ÃƒÆ'Ã†'Ãƒâ€šÃ‚Â¢ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡Ãƒâ€šÃ‚Â¬ÃƒÆ'Ã¢â‚¬Â¦Ãƒâ€šÃ‚Â¡ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â and debug it.ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã¢â‚¬Â 'ÃƒÆ'Ã†'Ãƒâ€šÃ‚Â¢ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡Ãƒâ€šÃ‚Â¬ÃƒÆ'Ã¢â‚¬Â¦Ãƒâ€šÃ‚Â¡ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> > > > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã¢â‚¬Â 'ÃƒÆ'Ã†'Ãƒâ€šÃ‚Â¢ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡Ãƒâ€šÃ‚Â¬ÃƒÆ'Ã¢â‚¬Â¦Ãƒâ€šÃ‚Â¡ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > > > The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> > > > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã¢â‚¬Â 'ÃƒÆ'Ã†'Ãƒâ€šÃ‚Â¢ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡Ãƒâ€šÃ‚Â¬ÃƒÆ'Ã¢â‚¬Â¦Ãƒâ€šÃ‚Â¡ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > > > Regards
> > > > > > > > > > > > > TK
> > > > > > > > > > > > >
> > > > > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > > > > Sent: Sunday, May 6, 2012 9:09 AM
> > > > > > > > > > > > > Subject: [DynoMotion] ATC M6 macro under mach3
> > > > > > > > > > > > >
> > > > > > > > > > > > >
> > > > > > > > > > > > > ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã¢â‚¬Â 'ÃƒÆ'Ã†'Ãƒâ€šÃ‚Â¢ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡Ãƒâ€šÃ‚Â¬ÃƒÆ'Ã¢â‚¬Â¦Ãƒâ€šÃ‚Â¡ÃƒÆ'Ã†'Ãƒâ€ 'ÃƒÆ'Ã‚Â¢ÃƒÂ¢Ã¢â‚¬Å¡Ã‚Â¬Ãƒâ€¦Ã‚Â¡ÃƒÆ'Ã†'ÃƒÂ¢Ã¢â€šÂ¬Ã…Â¡ÃƒÆ'Ã¢â‚¬Å¡Ãƒâ€šÃ‚Â
> > > > > > > > > > > > > Hi Tom, Ray,
> > > > > > > > > > > > >
> > > > > > > > > > > > > In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> > > > > > > > > > > > > At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> > > > > > > > > > > > > I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
> > > > > > > > > > > > >
> > > > > > > > > > > > > I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
> > > > > > > > > > > > >
> > > > > > > > > > > > > I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
> > > > > > > > > > > > >
> > > > > > > > > > > > > I don't know if I have to use an oemdro for the Getcurrentool()?
> > > > > > > > > > > > >
> > > > > > > > > > > > > So if you can explain me what's wrong I could go further.
> > > > > > > > > > > > >
> > > > > > > > > > > > > Thanks for your attention,
> > > > > > > > > > > > >
> > > > > > > > > > > > > Jerome
> > > > > > > > > > > > >
> > > > > > > > > > > >
> > > > > > > > > > >
> > > > > > > > > >
> > > > > > > > >
> > > > > > > >
> > > > > > >
> > > > > >
> > > > >
> > > >
> > >
> >
>

Group: DynoMotion	Message: 4836	From: Fouijar	Date: 5/8/2012
Subject: Re: ATC M6 macro under mach3

Hi Tom,

I will check that in 1 hour, I had written a message with this port config but I was on port1...
thx

J

--- In DynoMotion@yahoogroups.com, TK <tk@...> wrote:
>
> Oh for io numbers > 127 you need to subtract 128 and specify port #2.
>
> TK
>
> On May 8, 2012, at 8:28 AM, "Fouijar" <fouijar@...> wrote:
>
> > Hi Tom,
> >
> > Well, I use your file and the (de)activatesignal(OUTPUT#) function works for the leds on the Kflop board but not for outputting on Kanalog. If I command directly by Kmotion, it works perfectly.
> > I checked the read state of mach3 inputs, it's also working fine as it is in Kmotion.
> >
> > I think something is wrong between Mach and plugin. Do you have an idea?
> >
> > Regards,
> > Jerome
> >
> > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > >
> > > Hi Tom,
> > >
> > > Forget about that, I did a false comparison with the old file... my bad.
> > >
> > > Regards,
> > >
> > > J
> > >
> > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > >
> > > > Hi Tom,
> > > >
> > > > I did the comparison between the file you sent me back and the file I initially uploaded, they are basically the same. Are you sure it's the good file you sent me yesterday?
> > > >
> > > > Regards,
> > > >
> > > > Jerome
> > > >
> > > > PS: On a Win7 system it doesn't show any errors. I read a thread about that on machsupport forum and somebody said it's because Win7 is more fault tolerant...
> > > >
> > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > >
> > > > > Hi Jerome,
> > > > > Ã
> > > > > Opps I think I uploaded the original file rather than the one with my syntax fixes.
> > > > > Ã
> > > > > I re-up-loaded it.Ã See M6StartTK.m1s in your folder.
> > > > > Ã
> > > > > Regards
> > > > > TK
> > > > > Ã
> > > > > Ã
> > > > >
> > > > > From: Fouijar <fouijar@>
> > > > > To: DynoMotion@yahoogroups.com
> > > > > Sent: Monday, May 7, 2012 5:24 PM
> > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > >
> > > > >
> > > > > Ã
> > > > > Hi Tom,
> > > > >
> > > > > I don't see the example you're talking about.
> > > > >
> > > > > J.
> > > > >
> > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > >
> > > > > > Hi Tom,
> > > > > >
> > > > > > Many thanks for your help.
> > > > > >
> > > > > > I uploaded the "partial" sequence since I still have to do some operations to reload the new tool etc.
> > > > > > I always have the syntax error, but will try as you did, without
> > > > > > main statement.
> > > > > >
> > > > > > I'll have a check on your file now.
> > > > > >
> > > > > > Regards, J
> > > > > >
> > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > >
> > > > > > > Hi Jerome,
> > > > > > > ÃâÃ
> > > > > > > Look at the example I provided.ÃâÃ I removed the sub main statement (no need for it).ÃâÃ It makes the function or subroutine calls fine.
> > > > > > > ÃâÃ
> > > > > > > Regards
> > > > > > > TK
> > > > > > >
> > > > > > > From: Fouijar <fouijar@>
> > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > Sent: Monday, May 7, 2012 4:30 PM
> > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > >
> > > > > > >
> > > > > > > ÃâÃ
> > > > > > > Re,
> > > > > > >
> > > > > > > Something very annoying is the syntax error mentioned by the debugger when I Try to make a call in the Main sub. I read the VB macro programming reference book for mach3, there's a lot of such examples but none working for me, this is again ...
> > > > > > > Ok ctrl+c ; ctrl+v isn't so complicated but why a function doesn't work!
> > > > > > >
> > > > > > > J.
> > > > > > >
> > > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > > >
> > > > > > > > Hi Tom,
> > > > > > > >
> > > > > > > > I realize that but I use the included interpreter in Mach3 which is...
> > > > > > > > I did VB programming by the past, but more C# programming and I'm not very comfortable with programming since I haven't really had to do.
> > > > > > > >
> > > > > > > > What is the debugger you use for VB macros?
> > > > > > > >
> > > > > > > > J.
> > > > > > > >
> > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > >
> > > > > > > > > Hi Jerome,
> > > > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > Very unlikely there is a problem with the VB Interpreter :}
> > > > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > Did you realize that you can single step through your code?
> > > > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > Regards
> > > > > > > > > TK
> > > > > > > > >
> > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > Sent: Monday, May 7, 2012 3:56 PM
> > > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > > >
> > > > > > > > >
> > > > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > Hi Tom,
> > > > > > > > >
> > > > > > > > > Yes this the idea, but my actual problem is more about calling sequence not followed as it should.
> > > > > > > > >
> > > > > > > > > J.
> > > > > > > > >
> > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > >
> > > > > > > > > > Hi Jerome,
> > > > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > I can't understand what you are saying, but to wait for an inputÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ I think you would do something like
> > > > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > while (not IsActive(INPUT5))
> > > > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ Sleep(100)
> > > > > > > > > > wend
> > > > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > TK
> > > > > > > > > >
> > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > Sent: Monday, May 7, 2012 3:19 PM
> > > > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > Hi Tom,
> > > > > > > > > >
> > > > > > > > > > Outputs and inputs enabled.
> > > > > > > > > >
> > > > > > > > > > I was checking the bit numbers for inputs and outputs. I had the idea to use the WaitSystemFor(INPUT5), or a while(INPUT5=0)sleep(100)Wend
> > > > > > > > > > sequence. The idea is to have an output condition, or a temp.
> > > > > > > > > > INPUT5 is the limit switch indicating that the drawbar has released the tool.
> > > > > > > > > > I will test both and see.
> > > > > > > > > >
> > > > > > > > > > J.
> > > > > > > > > >
> > > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > > >
> > > > > > > > > > > Hi Jerome,
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > activatesignal(OUTPUT1) should work.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ Do you have Output1 configured in Ports&Pins Ouputs and enabled?
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > Here is some Mach3 VB code that will blink a KFLOP LED if Mach3 Output1 is configured as Port1 Pin46
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > activatesignal(OUTPUT1)
> > > > > > > > > > > Sleep 1000
> > > > > > > > > > > deactivatesignal(OUTPUT1)
> > > > > > > > > > > Sleep 1000
> > > > > > > > > > > activatesignal(OUTPUT1)
> > > > > > > > > > > Sleep 1000
> > > > > > > > > > > deactivatesignal(OUTPUT1)
> > > > > > > > > > >
> > > > > > > > > > > TK
> > > > > > > > > > >
> > > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > > Sent: Monday, May 7, 2012 2:34 PM
> > > > > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > > > > >
> > > > > > > > > > >
> > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > Hi Tom,
> > > > > > > > > > >
> > > > > > > > > > > I solved some issues I had in My M6 macro, I Use functions rather than Subs. I think that's not working to use a sub in main sub.
> > > > > > > > > > > So I call functions inside the Main Sub.
> > > > > > > > > > > I also use MsgBox to check what's wrong.
> > > > > > > > > > > The file isn't faulty but doesn't work as it should. When I run the script the function, i.e., activatesignal(OUTPUT1) doesn't work. Maybe, I think, I have to use the NotifyPlugins() or this should be handled directly by the dynomotion plugin?
> > > > > > > > > > >
> > > > > > > > > > > The only visible action is the executed code()function, the Z axis moves as commanded. This is a good step in the right direction.
> > > > > > > > > > >
> > > > > > > > > > > If I have to use the NotifyPlugins() Then a previous thread I wrote about the best choice between C#, Vb or brains should probably be resumed to the C# choice, since the M6 could be executed in the Notify.c without handling communication issues. This is only IF.
> > > > > > > > > > >
> > > > > > > > > > > I posted My code in the txt file ATC_J_Debug.
> > > > > > > > > > >
> > > > > > > > > > > Thanks for your attention,
> > > > > > > > > > >
> > > > > > > > > > > Jerome
> > > > > > > > > > >
> > > > > > > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > > > > > > >
> > > > > > > > > > > > Hi Tom,
> > > > > > > > > > > >
> > > > > > > > > > > > I started debugging this evening, more to come tomorrow.
> > > > > > > > > > > > I suppressed the compare function and made a test to know if the program has to run or leave.
> > > > > > > > > > > > The air cylinder procedure was written to add a security check.
> > > > > > > > > > > > The spindle is an AC asynchronous servo, the drive has a function I programmed and tuned to react at a particular entry and align the spindle with the tool holder (bt30).
> > > > > > > > > > > >
> > > > > > > > > > > > Thanks for your help,
> > > > > > > > > > > >
> > > > > > > > > > > > Jerome
> > > > > > > > > > > >
> > > > > > > > > > > > PS: I also write on the machsupport forum, this will give more visibility and resources.
> > > > > > > > > > > >
> > > > > > > > > > > > http://www.machsupport.com/forum/index.php/topic,21505.msg149510.html#msg149510
> > > > > > > > > > > >
> > > > > > > > > > > >
> > > > > > > > > > > >
> > > > > > > > > > > >
> > > > > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > > > > >
> > > > > > > > > > > > > Hi Jerome,
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > Sorry I wasn't aware of the Flowchart.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ You might point that out on the Mach3 foum as well so they will know what you are trying to do.
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > I wouldn't expect you to be able to just run it and get success.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ Something that complex will need to be debugged step by step.
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > I don't think parenthesis makes any difference in those cases.
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > To debug you might change the:
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > NewTool = GetSelectedTool()
> > > > > > > > > > > > > OldTool = GetCurrentTool()
> > > > > > > > > > > > >
> > > > > > > > > > > > > to
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > NewTool = 5
> > > > > > > > > > > > > OldTool = 3
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > in order to force a known case and be able to run it right from the VB editor.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ Use single step and verify each step does what you expect.
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > I think you should change the initial Compare to (because it wasn't waiting for anything):
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > 'Air Cylinder Homing
> > > > > > > > > > > > > sub AirCyHome()
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ DeactivateSignal(OUTPUT8)
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ While (IsActive(INPUT1))
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ Sleep(10)
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ Wend
> > > > > > > > > > > > > end sub
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > Regarding the ToolChangerPos this does a bunch of testing but doesn't do anything
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > 'Carrousel air cylinder position check : Home, in Mvt and ToolChange
> > > > > > > > > > > > > Function ToolChangerPos() As Boolean
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ If IsActive(INPUT1)>IsActive(INPUT2)Then 'We are at Home Position
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ToolChangerPos = 0
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ TCMove = False 'We are stopped
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ElseIf IsActive(INPUT1)<IsActive(INPUT2) Then
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ToolChangerPos = 1
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ TCMove = False
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ Else
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ToolChangerPos = -1
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ TCMove = True
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ End If
> > > > > > > > > > > > > End Function
> > > > > > > > > > > > >
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > the SpindleHome function just sets an output bit.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ I don't understand how you expect this to home the spindle.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ What type of spindle do you have?
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > Regards
> > > > > > > > > > > > > TK
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > >
> > > > > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > > > > Sent: Sunday, May 6, 2012 1:38 PM
> > > > > > > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > > > > > > >
> > > > > > > > > > > > >
> > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > Hi Tom,
> > > > > > > > > > > > >
> > > > > > > > > > > > > I checked and compared files, I also made changes as proposed by mach users. The files mods proposed are:
> > > > > > > > > > > > >
> > > > > > > > > > > > > while(IsMoving())
> > > > > > > > > > > > > Sleep(100)
> > > > > > > > > > > > > code("G00 Z-35")'Move to the safe Z position for tool change
> > > > > > > > > > > > > while (IsMoving())
> > > > > > > > > > > > >
> > > > > > > > > > > > > Should be this:
> > > > > > > > > > > > >
> > > > > > > > > > > > > Code "G00 Z-35"
> > > > > > > > > > > > > While IsMoving()
> > > > > > > > > > > > > Wend
> > > > > > > > > > > > >
> > > > > > > > > > > > > You don't need the Sleep() in the While IsMoving().
> > > > > > > > > > > > >
> > > > > > > > > > > > > Mods are proposed by ger21 on machsupport forum.
> > > > > > > > > > > > >
> > > > > > > > > > > > > I tried that, and your file without success.
> > > > > > > > > > > > > I also tried a mix with(out) parenthesis :
> > > > > > > > > > > > >
> > > > > > > > > > > > > IsMoving()<>(IsMoving())
> > > > > > > > > > > > > code("G00 Z-35")<>Code "G00 Z-35"
> > > > > > > > > > > > >
> > > > > > > > > > > > > Anyway I keep trying to find what's wrong.
> > > > > > > > > > > > >
> > > > > > > > > > > > > Jerome
> > > > > > > > > > > > >
> > > > > > > > > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > Hi Tom,
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > I know this is Mach3 related.
> > > > > > > > > > > > > > But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
> > > > > > > > > > > > > > I started a topic on the VB section of machsupport.
> > > > > > > > > > > > > > http://www.machsupport.com/forum/index.php/topic,21505.0.html
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > The flowchart is included in my files: ATC procedure.png
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > The Compare function was created to check if the current tool is the same as the requested tool or new tool.
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
> > > > > > > > > > > > > > I haven't checked your work yet.
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > Regards,
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > J.
> > > > > > > > > > > > > >
> > > > > > > > > > > > > >
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > Hi Jerome,
> > > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬Ã 'ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Å¡ÃâÃÂ¢ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ¬ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¦ÃÆ'Ã¢â¬Å¡ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > > These are Mach3 and Mach3 VB questions.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬Ã 'ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Å¡ÃâÃÂ¢ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ¬ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¦ÃÆ'Ã¢â¬Å¡ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ I fixed general typos and syntax errors so it now compiles and uploaded the file.
> > > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬Ã 'ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Å¡ÃâÃÂ¢ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ¬ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¦ÃÆ'Ã¢â¬Å¡ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > > It will be up to you to understand itÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬Ã 'ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Å¡ÃâÃÂ¢ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ¬ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¦ÃÆ'Ã¢â¬Å¡ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ and debug it.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬Ã 'ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Å¡ÃâÃÂ¢ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ¬ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¦ÃÆ'Ã¢â¬Å¡ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> > > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬Ã 'ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Å¡ÃâÃÂ¢ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ¬ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¦ÃÆ'Ã¢â¬Å¡ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > > The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> > > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬Ã 'ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Å¡ÃâÃÂ¢ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ¬ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¦ÃÆ'Ã¢â¬Å¡ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > > Regards
> > > > > > > > > > > > > > > TK
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > > > > > > Sent: Sunday, May 6, 2012 9:09 AM
> > > > > > > > > > > > > > > Subject: [DynoMotion] ATC M6 macro under mach3
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬Ã 'ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Å¡ÃâÃÂ¢ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ¬ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¦ÃÆ'Ã¢â¬Å¡ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > > Hi Tom, Ray,
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> > > > > > > > > > > > > > > At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> > > > > > > > > > > > > > > I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > I don't know if I have to use an oemdro for the Getcurrentool()?
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > So if you can explain me what's wrong I could go further.
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > Thanks for your attention,
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > Jerome
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > >
> > > > > > > > > > > > >
> > > > > > > > > > > >
> > > > > > > > > > >
> > > > > > > > > >
> > > > > > > > >
> > > > > > > >
> > > > > > >
> > > > > >
> > > > >
> > > >
> > >
> >
> >
>

Group: DynoMotion	Message: 4862	From: Fouijar	Date: 5/8/2012
Subject: Re: ATC M6 macro under mach3

Hi Tom,

First of all, thank you.
Now the situation has drastically changed, everything works, I only have to adjust and tune my sequences to match expected results.
I started to write better code and adjustments.

Thanks for you patience, attention and quality support.

Regards,

Jerome

--- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@...> wrote:
>
> Hi Tom,
>
> I will check that in 1 hour, I had written a message with this port config but I was on port1...
> thx
>
> J
>
> --- In DynoMotion@yahoogroups.com, TK <tk@> wrote:
> >
> > Oh for io numbers > 127 you need to subtract 128 and specify port #2.
> >
> > TK
> >
> > On May 8, 2012, at 8:28 AM, "Fouijar" <fouijar@> wrote:
> >
> > > Hi Tom,
> > >
> > > Well, I use your file and the (de)activatesignal(OUTPUT#) function works for the leds on the Kflop board but not for outputting on Kanalog. If I command directly by Kmotion, it works perfectly.
> > > I checked the read state of mach3 inputs, it's also working fine as it is in Kmotion.
> > >
> > > I think something is wrong between Mach and plugin. Do you have an idea?
> > >
> > > Regards,
> > > Jerome
> > >
> > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > >
> > > > Hi Tom,
> > > >
> > > > Forget about that, I did a false comparison with the old file... my bad.
> > > >
> > > > Regards,
> > > >
> > > > J
> > > >
> > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > >
> > > > > Hi Tom,
> > > > >
> > > > > I did the comparison between the file you sent me back and the file I initially uploaded, they are basically the same. Are you sure it's the good file you sent me yesterday?
> > > > >
> > > > > Regards,
> > > > >
> > > > > Jerome
> > > > >
> > > > > PS: On a Win7 system it doesn't show any errors. I read a thread about that on machsupport forum and somebody said it's because Win7 is more fault tolerant...
> > > > >
> > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > >
> > > > > > Hi Jerome,
> > > > > > Ã
> > > > > > Opps I think I uploaded the original file rather than the one with my syntax fixes.
> > > > > > Ã
> > > > > > I re-up-loaded it.Ã See M6StartTK.m1s in your folder.
> > > > > > Ã
> > > > > > Regards
> > > > > > TK
> > > > > > Ã
> > > > > > Ã
> > > > > >
> > > > > > From: Fouijar <fouijar@>
> > > > > > To: DynoMotion@yahoogroups.com
> > > > > > Sent: Monday, May 7, 2012 5:24 PM
> > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > >
> > > > > >
> > > > > > Ã
> > > > > > Hi Tom,
> > > > > >
> > > > > > I don't see the example you're talking about.
> > > > > >
> > > > > > J.
> > > > > >
> > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > >
> > > > > > > Hi Tom,
> > > > > > >
> > > > > > > Many thanks for your help.
> > > > > > >
> > > > > > > I uploaded the "partial" sequence since I still have to do some operations to reload the new tool etc.
> > > > > > > I always have the syntax error, but will try as you did, without
> > > > > > > main statement.
> > > > > > >
> > > > > > > I'll have a check on your file now.
> > > > > > >
> > > > > > > Regards, J
> > > > > > >
> > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > >
> > > > > > > > Hi Jerome,
> > > > > > > > ÃâÃ
> > > > > > > > Look at the example I provided.ÃâÃ I removed the sub main statement (no need for it).ÃâÃ It makes the function or subroutine calls fine.
> > > > > > > > ÃâÃ
> > > > > > > > Regards
> > > > > > > > TK
> > > > > > > >
> > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > Sent: Monday, May 7, 2012 4:30 PM
> > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > >
> > > > > > > >
> > > > > > > > ÃâÃ
> > > > > > > > Re,
> > > > > > > >
> > > > > > > > Something very annoying is the syntax error mentioned by the debugger when I Try to make a call in the Main sub. I read the VB macro programming reference book for mach3, there's a lot of such examples but none working for me, this is again ...
> > > > > > > > Ok ctrl+c ; ctrl+v isn't so complicated but why a function doesn't work!
> > > > > > > >
> > > > > > > > J.
> > > > > > > >
> > > > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > > > >
> > > > > > > > > Hi Tom,
> > > > > > > > >
> > > > > > > > > I realize that but I use the included interpreter in Mach3 which is...
> > > > > > > > > I did VB programming by the past, but more C# programming and I'm not very comfortable with programming since I haven't really had to do.
> > > > > > > > >
> > > > > > > > > What is the debugger you use for VB macros?
> > > > > > > > >
> > > > > > > > > J.
> > > > > > > > >
> > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > >
> > > > > > > > > > Hi Jerome,
> > > > > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > Very unlikely there is a problem with the VB Interpreter :}
> > > > > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > Did you realize that you can single step through your code?
> > > > > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > Regards
> > > > > > > > > > TK
> > > > > > > > > >
> > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > Sent: Monday, May 7, 2012 3:56 PM
> > > > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > > > >
> > > > > > > > > >
> > > > > > > > > > ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > Hi Tom,
> > > > > > > > > >
> > > > > > > > > > Yes this the idea, but my actual problem is more about calling sequence not followed as it should.
> > > > > > > > > >
> > > > > > > > > > J.
> > > > > > > > > >
> > > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > > >
> > > > > > > > > > > Hi Jerome,
> > > > > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > I can't understand what you are saying, but to wait for an inputÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ I think you would do something like
> > > > > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > while (not IsActive(INPUT5))
> > > > > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ Sleep(100)
> > > > > > > > > > > wend
> > > > > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > TK
> > > > > > > > > > >
> > > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > > Sent: Monday, May 7, 2012 3:19 PM
> > > > > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > > > > >
> > > > > > > > > > >
> > > > > > > > > > > ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > Hi Tom,
> > > > > > > > > > >
> > > > > > > > > > > Outputs and inputs enabled.
> > > > > > > > > > >
> > > > > > > > > > > I was checking the bit numbers for inputs and outputs. I had the idea to use the WaitSystemFor(INPUT5), or a while(INPUT5=0)sleep(100)Wend
> > > > > > > > > > > sequence. The idea is to have an output condition, or a temp.
> > > > > > > > > > > INPUT5 is the limit switch indicating that the drawbar has released the tool.
> > > > > > > > > > > I will test both and see.
> > > > > > > > > > >
> > > > > > > > > > > J.
> > > > > > > > > > >
> > > > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > > > >
> > > > > > > > > > > > Hi Jerome,
> > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > activatesignal(OUTPUT1) should work.ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ Do you have Output1 configured in Ports&Pins Ouputs and enabled?
> > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > Here is some Mach3 VB code that will blink a KFLOP LED if Mach3 Output1 is configured as Port1 Pin46
> > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > activatesignal(OUTPUT1)
> > > > > > > > > > > > Sleep 1000
> > > > > > > > > > > > deactivatesignal(OUTPUT1)
> > > > > > > > > > > > Sleep 1000
> > > > > > > > > > > > activatesignal(OUTPUT1)
> > > > > > > > > > > > Sleep 1000
> > > > > > > > > > > > deactivatesignal(OUTPUT1)
> > > > > > > > > > > >
> > > > > > > > > > > > TK
> > > > > > > > > > > >
> > > > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > > > Sent: Monday, May 7, 2012 2:34 PM
> > > > > > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > > > > > >
> > > > > > > > > > > >
> > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > Hi Tom,
> > > > > > > > > > > >
> > > > > > > > > > > > I solved some issues I had in My M6 macro, I Use functions rather than Subs. I think that's not working to use a sub in main sub.
> > > > > > > > > > > > So I call functions inside the Main Sub.
> > > > > > > > > > > > I also use MsgBox to check what's wrong.
> > > > > > > > > > > > The file isn't faulty but doesn't work as it should. When I run the script the function, i.e., activatesignal(OUTPUT1) doesn't work. Maybe, I think, I have to use the NotifyPlugins() or this should be handled directly by the dynomotion plugin?
> > > > > > > > > > > >
> > > > > > > > > > > > The only visible action is the executed code()function, the Z axis moves as commanded. This is a good step in the right direction.
> > > > > > > > > > > >
> > > > > > > > > > > > If I have to use the NotifyPlugins() Then a previous thread I wrote about the best choice between C#, Vb or brains should probably be resumed to the C# choice, since the M6 could be executed in the Notify.c without handling communication issues. This is only IF.
> > > > > > > > > > > >
> > > > > > > > > > > > I posted My code in the txt file ATC_J_Debug.
> > > > > > > > > > > >
> > > > > > > > > > > > Thanks for your attention,
> > > > > > > > > > > >
> > > > > > > > > > > > Jerome
> > > > > > > > > > > >
> > > > > > > > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > > > > > > > >
> > > > > > > > > > > > > Hi Tom,
> > > > > > > > > > > > >
> > > > > > > > > > > > > I started debugging this evening, more to come tomorrow.
> > > > > > > > > > > > > I suppressed the compare function and made a test to know if the program has to run or leave.
> > > > > > > > > > > > > The air cylinder procedure was written to add a security check.
> > > > > > > > > > > > > The spindle is an AC asynchronous servo, the drive has a function I programmed and tuned to react at a particular entry and align the spindle with the tool holder (bt30).
> > > > > > > > > > > > >
> > > > > > > > > > > > > Thanks for your help,
> > > > > > > > > > > > >
> > > > > > > > > > > > > Jerome
> > > > > > > > > > > > >
> > > > > > > > > > > > > PS: I also write on the machsupport forum, this will give more visibility and resources.
> > > > > > > > > > > > >
> > > > > > > > > > > > > http://www.machsupport.com/forum/index.php/topic,21505.msg149510.html#msg149510
> > > > > > > > > > > > >
> > > > > > > > > > > > >
> > > > > > > > > > > > >
> > > > > > > > > > > > >
> > > > > > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > Hi Jerome,
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > Sorry I wasn't aware of the Flowchart.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ You might point that out on the Mach3 foum as well so they will know what you are trying to do.
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > I wouldn't expect you to be able to just run it and get success.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ Something that complex will need to be debugged step by step.
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > I don't think parenthesis makes any difference in those cases.
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > To debug you might change the:
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > NewTool = GetSelectedTool()
> > > > > > > > > > > > > > OldTool = GetCurrentTool()
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > to
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > NewTool = 5
> > > > > > > > > > > > > > OldTool = 3
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > in order to force a known case and be able to run it right from the VB editor.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ Use single step and verify each step does what you expect.
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > I think you should change the initial Compare to (because it wasn't waiting for anything):
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > 'Air Cylinder Homing
> > > > > > > > > > > > > > sub AirCyHome()
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ DeactivateSignal(OUTPUT8)
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ While (IsActive(INPUT1))
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ Sleep(10)
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ Wend
> > > > > > > > > > > > > > end sub
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > Regarding the ToolChangerPos this does a bunch of testing but doesn't do anything
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > 'Carrousel air cylinder position check : Home, in Mvt and ToolChange
> > > > > > > > > > > > > > Function ToolChangerPos() As Boolean
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ If IsActive(INPUT1)>IsActive(INPUT2)Then 'We are at Home Position
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ToolChangerPos = 0
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ TCMove = False 'We are stopped
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ElseIf IsActive(INPUT1)<IsActive(INPUT2) Then
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ToolChangerPos = 1
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ TCMove = False
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ Else
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ToolChangerPos = -1
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ TCMove = True
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ End If
> > > > > > > > > > > > > > End Function
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > the SpindleHome function just sets an output bit.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ I don't understand how you expect this to home the spindle.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ What type of spindle do you have?
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > Regards
> > > > > > > > > > > > > > TK
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > > > > > Sent: Sunday, May 6, 2012 1:38 PM
> > > > > > > > > > > > > > Subject: [DynoMotion] Re: ATC M6 macro under mach3
> > > > > > > > > > > > > >
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > Hi Tom,
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > I checked and compared files, I also made changes as proposed by mach users. The files mods proposed are:
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > while(IsMoving())
> > > > > > > > > > > > > > Sleep(100)
> > > > > > > > > > > > > > code("G00 Z-35")'Move to the safe Z position for tool change
> > > > > > > > > > > > > > while (IsMoving())
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > Should be this:
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > Code "G00 Z-35"
> > > > > > > > > > > > > > While IsMoving()
> > > > > > > > > > > > > > Wend
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > You don't need the Sleep() in the While IsMoving().
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > Mods are proposed by ger21 on machsupport forum.
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > I tried that, and your file without success.
> > > > > > > > > > > > > > I also tried a mix with(out) parenthesis :
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > IsMoving()<>(IsMoving())
> > > > > > > > > > > > > > code("G00 Z-35")<>Code "G00 Z-35"
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > Anyway I keep trying to find what's wrong.
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > Jerome
> > > > > > > > > > > > > >
> > > > > > > > > > > > > > --- In DynoMotion@yahoogroups.com, "Fouijar" <fouijar@> wrote:
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > Hi Tom,
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > I know this is Mach3 related.
> > > > > > > > > > > > > > > But I asked since there's a general interest for anybody who uses Mach3 and Kflop.
> > > > > > > > > > > > > > > I started a topic on the VB section of machsupport.
> > > > > > > > > > > > > > > http://www.machsupport.com/forum/index.php/topic,21505.0.html
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > The flowchart is included in my files: ATC procedure.png
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > The Compare function was created to check if the current tool is the same as the requested tool or new tool.
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > Thanks for you support, I think it will greatly help me and anyone involved with Kflop+Mach.
> > > > > > > > > > > > > > > I haven't checked your work yet.
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > Regards,
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > J.
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > --- In DynoMotion@yahoogroups.com, Tom Kerekes <tk@> wrote:
> > > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > > Hi Jerome,
> > > > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬Ã 'ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Å¡ÃâÃÂ¢ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ¬ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¦ÃÆ'Ã¢â¬Å¡ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > > > These are Mach3 and Mach3 VB questions.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬Ã 'ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Å¡ÃâÃÂ¢ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ¬ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¦ÃÆ'Ã¢â¬Å¡ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ I fixed general typos and syntax errors so it now compiles and uploaded the file.
> > > > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬Ã 'ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Å¡ÃâÃÂ¢ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ¬ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¦ÃÆ'Ã¢â¬Å¡ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > > > It will be up to you to understand itÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬Ã 'ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Å¡ÃâÃÂ¢ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ¬ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¦ÃÆ'Ã¢â¬Å¡ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ and debug it.ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬Ã 'ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Å¡ÃâÃÂ¢ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ¬ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¦ÃÆ'Ã¢â¬Å¡ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ I notice things like the first function call to Compare returns a result that is never used so I'm not sure what the point is.
> > > > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬Ã 'ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Å¡ÃâÃÂ¢ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ¬ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¦ÃÆ'Ã¢â¬Å¡ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > > > The first step might be for you to create a flowchart or description of how you expect your tool changer to operate.
> > > > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬Ã 'ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Å¡ÃâÃÂ¢ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ¬ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¦ÃÆ'Ã¢â¬Å¡ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > > > Regards
> > > > > > > > > > > > > > > > TK
> > > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > > From: Fouijar <fouijar@>
> > > > > > > > > > > > > > > > To: DynoMotion@yahoogroups.com
> > > > > > > > > > > > > > > > Sent: Sunday, May 6, 2012 9:09 AM
> > > > > > > > > > > > > > > > Subject: [DynoMotion] ATC M6 macro under mach3
> > > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > > ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬Ã 'ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬Å¡ÃâÃÂ¢ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃÂ¬ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¦ÃÆ'Ã¢â¬Å¡ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'Ã¢â¬ 'ÃÆ'Ã'ÃâÃÂ¢ÃÆ'ÃÂ¢ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃâÃÂ¬ÃÆ'Ã¢â¬Â¦ÃâÃÂ¡ÃÆ'Ã'Ãâ 'ÃÆ'ÃÂ¢ÃÂ¢Ã¢â¬Å¡ÃÂ¬Ãâ¦ÃÂ¡ÃÆ'Ã'ÃÂ¢Ã¢âÂ¬ÃÂ¡ÃÆ'Ã¢â¬Å¡ÃâÃ
> > > > > > > > > > > > > > > > Hi Tom, Ray,
> > > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > > In December Ray helped me to rewrite the macro I did for ATC in Mach3.
> > > > > > > > > > > > > > > > At the time I wasn't ready to test it without risks, now that I'm ready and made trials I have a M6 scripter compile error in mach3.
> > > > > > > > > > > > > > > > I uploaded the file to my folder so if you can have a look and tell me what's wrong with the code.
> > > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > > I checked on machsupport forum but the presented codes were not for carousel atc system and not really to compare with my setup.
> > > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > > I did some tests with the clamp and unclamp sub calls only, and I still have the same message.
> > > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > > I don't know if I have to use an oemdro for the Getcurrentool()?
> > > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > > So if you can explain me what's wrong I could go further.
> > > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > > Thanks for your attention,
> > > > > > > > > > > > > > > >
> > > > > > > > > > > > > > > > Jerome
> > > > > > > > > > > > > > > >
> > > > > > > > > > > > > > >
> > > > > > > > > > > > > >
> > > > > > > > > > > > >
> > > > > > > > > > > >
> > > > > > > > > > >
> > > > > > > > > >
> > > > > > > > >
> > > > > > > >
> > > > > > >
> > > > > >
> > > > >
> > > >
> > >
> > >
> >
>

Group: DynoMotion	Message: 4864	From: Tom Kerekes	Date: 5/8/2012
Subject: Re: ATC M6 macro under mach3

Hi Jerome,

Thanks for your patience.

Regards

Group: DynoMotion	Message: 4783	From: Fouijar	Date: 5/6/2012
Subject: ATC M6 macro under mach3

Group: DynoMotion	Message: 4789	From: Tom Kerekes	Date: 5/6/2012
Subject: Re: ATC M6 macro under mach3